Ako určiť ďalšiu voľnú bunku v stĺpci pomocou makra
V mnohých makrách by mali byť údaje pridávané priebežne. Potom je potrebné určiť ďalšiu bunku v stĺpci, do ktorého môžete zadávať údaje. Môžete to vyriešiť pomocou vzorca programu Excel.
Ak však chcete určiť poslednú bunku v makre, potrebujete príkazy VBA. Existuje niekoľko prístupov k riešeniu problému. Tu je vhodné makro:
Vedľajšie vyhľadávanieFreeCell ()
Dim Cell as Range
Dim Maxzeile ako dlhý
Ak Val (vľavo (Application.Version, 2))> 11 Potom
Maximálna čiara = 1048576
Inak
Maximálna čiara = 65536
Koniec Ak
Nastaviť bunku = Bunky (Maxzeile, 1). Koniec (xlUp). Offset (1, 0)
MsgBox „Ďalšia voľná bunka je“ & cell.Address (False, False)
Koniec pod
Po spustení makro určí ďalšiu voľnú, nepoužitú bunku v stĺpci A. Adresa tejto bunky sa zobrazí v okne.
Makro adresuje posledný riadok v stĺpci A aktívnej tabuľky a od toho určuje poslednú bunku použitú vyššie. Aby makro fungovalo v Exceli až do verzie 2003, ako aj v Exceli od verzie 2007, je na začiatku vhodné rozlíšenie prípadu. Toto rozlišovanie prípadov je nevyhnutné, pretože počet dostupných riadkov sa s verziou 2007 zvýšil z 65536 na 1048576.
Ak chcete nájsť voľnú bunku v stĺpci namiesto voľnej bunky v stĺpci A, nahraďte prvé číslo 1 v zátvorkách za príkazom Bunky číslom zodpovedajúceho stĺpca.
Tip: Ak by ste chceli vedieť, ako zadávať a spúšťať makrá v Exceli, nájdete tu stručný popis: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html