Ďakujeme Mikeovi, ktorý tento týždeň poskytol otázku o programe Excel:
Snažím sa napísať makro a som v tom nový. Mám tabuľku programu Excel, ktorá má stovky stránok a veľa stĺpcov. Bol by som rád, keby makro vyhľadalo iba stĺpec „A“ pre „“ (žiadne údaje) a potom použilo údaje z predchádzajúceho riadku, vybralo zo stĺpcov „A“ až „CB“ a potom ich vyplňovalo, kým nezistí údaje v a bunka v stĺpci „A“. Potom je potrebné opakovať, kým nebude všetko hotové.
Makro uvedené nižšie bude stačiť:
Public Sub CopyDown() LastRow = Range("A65536").End(xlUp).Row For i = 1 To LastRow If Range("A" & i).Value = "" Then Range("A" & i - 1 & ":CB" & i - 1).Copy Destination:=Range("A" & i) End if Next i End SubMožno však nebudete musieť použiť makro na to, aby ste robili, čo chcete. Rýchlejší spôsob je použiť triky zavedené v tipe od 12/12/98, aby ste dosiahli to isté bez makra.
Prvým trikom je výber všetkých prázdnych buniek vo vašom výbere. Zvýraznite od A1 po CB v poslednom riadku vašich údajov. Vyberte položky Upraviť> GoTo> Špeciálne> Prázdne> OK.
Ďalej chcete do všetkých týchto prázdnych buniek zadať rovnaký vzorec. Ak to chcete urobiť, stlačte kláves Equals, stlačte šípku nahor, podržte stlačený kláves Ctrl a stlačte kláves Enter. Takto sa vzorec replikuje do všetkých prázdnych buniek.
Nakoniec zmeňte vzorce na hodnoty. Zvýraznite celý rozsah údajov, vyberte Upraviť> Kopírovať, Upraviť> Prilepiť špeciálne> Hodnoty> OK.
Upozorňujeme, že ak pôvodné Mikeove údaje obsahovali vzorce alebo obsahovali niektoré riadky, ktoré boli čiastočne prázdne, potom tento postup nebude fungovať, bolo by lepšie držať sa makra zobrazeného vyššie.
