toto je kod:
For i = 1 To ActiveSheet.UsedRange.Rows.count
range("A" & i & ":B" & i).Merge
Next i
- je to cyklus, ktory bude bezat od bunky A1 do najnizsej pouzitej bunky a bude zlucovat A a B
- ak by si chcel zacat od inej bunky, tak len zmen vychodzi riadok v prvom riadku (i = 1) alebo bunky v druhom riadku (zmenou pismenok A a B na ine)
- ked spajas dve bunky, v ktorych je nieco vyplnene, tak ti excel vyhodi error a spyta sa ta ci je ok ked ponecha len udaj z "najlavsej"" bunky; tento error treba vypnut, ale takisto nezabudat na konci makra zase zapnut, cize hotove makro bude vyzerat napr takto:
Sub zlucovanie()
Application.DisplayAlerts = False
For i = 1 To ActiveSheet.UsedRange.Rows.count
range("A" & i & ":B" & i).Merge
Next i
Application.DisplayAlerts = True
End Sub
.. ak ho budes vyuzivat casto, tak si ho mozes hodit na listu ako gombik. pravy klik na listu(ribbon) -> customize ribbon-> Choose commands from: Macros -> najdes svoje macro a zaradis do ponuky nalavo, premenuj a kedtak zmen aj ikonu
// Spojený príspevok Pia 25.05.18 12:33
ps. ak chces aj ine prikazy, aby sa opakovali az po najnizsi pouzity riadok, tak to tiez hod medzi tieto dva riadky:
For i = 1 To ActiveSheet.UsedRange.Rows.count
..
Next i
| 
