Word
Excel
PowerPoint
Access
Outlook
ECDL
Poradna - Prosím o pomoc s rozluštěním makra
Vložení příspěvkuhlavní kategorie | zpět | + odpovědět na toto téma
| Prosím o pomoc s rozluštěním makra - diskuze na toto téma |
| Ahoj,
potřebovala bych pomoc s rozluštěním, co makro, které mi bylo dáno dělá. Kolegyně mi to nebyla schopná vysvětlit a makro nedobíhá. Ráda bych zjistila s jakými řádky a sloupci na listech to pracuje, abych mohla případně výchozí data upravit a už to konečně fungovalo. Prosím najde se tu někdo moc hodný, kdo mi poradí?
Sub Sestava()
'
' Makro1 Makro
'
Set MD = Worksheets("MD kmenová data")
Set DOCH = Worksheets("Docházka")
Set HOD = Worksheets("Hodiny - LOGA")
Set NAP = Worksheets("Napomenutí")
Set VYJ = Worksheets("Výjimky")
Set ZL = Worksheets("Zlepšováky")
Set BOD = Worksheets("Kritéria počtu")
' příjmení, jméno do sloupce D
DOCH.Activate
Range("D1").Select
Selection.Copy
Range("D2:D5000").Select
ActiveSheet.Paste
Range("A2").Select
'datumy dle výjimek
For r_v = 2 To 500
If VYJ.Cells(r_v, "B").Value = "" Then GoTo konec4
For r_m = 2 To 5000
If MD.Cells(r_m, "F").Value = "" Then GoTo konec3
If MD.Cells(r_m, 6).Value = VYJ.Cells(r_v, 1).Value Then
MD.Cells(r_m, "H").Value = V Ahoj, potřebovala bych pomoc s rozluštěním, co makro, které mi bylo dáno dělá. Kolegyně mi to nebyla schopná vysvětlit a makro nedobíhá. Ráda bych zjistila s jakými řádky a sloupci na listech to pracuje, abych mohla případně výchozí data upravit a už to konečně fungovalo. Prosím najde se tu někdo moc
Raději přikládám makro v samostatném souboru Odpověď |
