< návrat zpět
MS Excel
Téma: zápis do sloupců automaticky
Zaslal/a lachatol1 29.11.2017 9:56
Potřeboval bych napsat kód, v excelu (VBA), který by zařídil při zapisování hodnot do sešitu do sloupce A (zápis začne v A1 a skončí v A10) pod sebe by se při vyplnění buňky A10 automaticky přesunul kurzor (nebo označení bunky) do dalšího sloupce - do bunky B1 a stejně pokračoval zápis až do B10 a potom se znovu přesunul do C1 a zase by to pokračovalo stále dál. Díky
neprihlasenyHavran(29.11.2017 10:08)#038514 Ak myšou vyberieš napr. oblasť A1 : G10 a začneš editovať bunky od A1, po zídení po 10 riadok skočí automaticky do B1.
citovat
AL(4.12.2017 18:28)#038598 Si sa naučila nové slovo alebo máš dojem, že Havran dal nesprávnu odpoveď?
citovat
kabaka(4.12.2017 20:28)#038602 AL napsal/a:
Si sa naučila nové slovo alebo máš dojem, že Havran dal nesprávnu odpoveď?
pardon
citovat
AL(4.12.2017 20:30)#038603 opat mazes prispevky, takze reakcie, ktore nasleduju, potom nedavaju zmysel?
citovat
marjankaj(4.12.2017 22:03)#038607 Havran dal správnu odpoveď. Ale zadávateľ to zrejme chce aby to fungovalo aj u menej skúsených klientov. V tomto prípade by to vyriešilo uzamknutie ostatných buniek. Teda povoliť zápis iba do vybraných buniek.
citovat
Pri krkolomnom zadaní jeden krkolomný príklad:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Zmena As Range
Set Zmena = Intersect(Rows(10), Target)
If Not Zmena Is Nothing Then
With Zmena
If .Rows.Count < Rows.Count Then
With .Areas(.Areas.Count).Cells(.Areas(.Areas.Count).Cells.Count)
If .Value2 <> "" Then .Offset(-9, 1).Activate
End With
End If
End With
Set Zmena = Nothing
End If
End Subcitovat