Afișaj în formule în loc de celule referire valorile celulelor, Excel pentru toate
Cum funcționează:
- selectați celulele cu formule care au nevoie de „spectacol“;
- faceți clic pe „Valoarea de afișare a unei formule în celula selectată“;
- vi se solicită
- Dacă selectați „Nu“ transforma formula va fi înregistrată în celulele din dreapta fiecare selectată
Nu este întotdeauna convenabil, deoarece Formulele pot fi în celule adiacente și o abordare similară poate suprascrie datele altor celule - Dacă selectați „Da“, atunci formula va fi transformată în nota scrisă stabilită (nota creată în cadrul codului, nu este necesară nici o acțiune). Cred că este convenabil, deoarece date de la alte celule nu sunt modificate, dar cu formula pot întotdeauna spion - și referințe și valorile lor;
Dacă oricare dintre celulele nu vor fi link-uri către alte celule, ci pur și simplu o formulă de text, atunci rezultatul va afișa formula în sine și textul: „[referințele la alte celule nu au]“
Dacă funcțiile formulei utilizate (... WRT COUNTIF MIN MAX, etc.), numele lor vor fi afișate fără distorsiuni (ca în exemplul nested = SUM (5,2; 7,8) + INT (5/11) )
În cazul în care există referințe la celule din alte foi sau cărți, ele apar ca toți ceilalți - doar valorile.
În cazul în care formulele sunt trimiteri la matrice de celule (A14: B16) - toate valorile matrice non-celule goale vor fi afișate (cum ar trebui să fie o matrice în acolade:. Un șir de colon separate și punct-la-punct - coloanele).
În viitorul apropiat, pentru a face unele ajustări de cod pentru a putea închide cu valorile și afișa numele cărților de foi, din care sunt obținute aceste valori. În timp ce mă gândesc cum poate fi util și necesar, și este cel mai ușor de citit pe ecran.
Căutare după Tag
Pentru Excel'ya sub Windows, puteți scrie mai pe scurt:
Dim i lung Dim Ca str. resStr ca șir de Dim matchPos Ca lung str = ActiveCell. Formula Set oRegEx = CreateObject ( "vbscript.regexp") oRegEx. Model = "\ $ * [A-Z] + \ $ * [0-9] +" oRegEx. Global = Adevărat Setare Meciuri = oRegEx. Execute (str) resStr = "" Pentru i = 0 la meciuri. Count - 1 matchPos = INSTR (str Meciuri Articol (i) valoarea ...) ResStr = resStr Mid (str 1. matchPos - 1). Interval (potriviri. Articol (i). Valoare) str = Mid (str. MatchPos + Meciuri. Articol (i). Lungime) Următoarea MsgBox resStr
Alo Vă mulțumim pentru codul! Această linie:
sRez = "„" sFormStr
Am transformat în:
sRez = sFormStr
Dar problema este că într-un astfel de cod nu funcționează cu neintregii. Aceasta este, într-o notă imprimă cum era de așteptat, dar celula nu este. Cu numere întregi totul funcționează.
Te rog spune-mi ce este motivul?