< návrat zpět

MS Excel


Téma: Opakování makra - next I rss

Zaslal/a 18.6.2019 15:30

Zdravím , potřeboval bych pomoc s makrem, aby se opakovalo pořádku.
Jde mi o to že mám na řádku informace které makrem přes comobox ručně člověk oveřuje (mám i automaticky ale to nemusí být správně) Proste aby vyskočilo okno s údaji a človek klikne na ano - ne - zrušit, po kliknutí ano se udělá makro A, na ne makro B, a po dokončení by vyskočilo znova okno na rozhodnutí ale o řádek níže a tak dokola, dokud by nebyl na konci nebo se nekliklo na cancel. + jestli jde při spuštění aby začal od řádku který je zrovna vybrán.
Snad pomůže příloha kde to mám nějak rozpracované, ale moc mi to nefunguje. Sem to měl udělané že vždy prováděl na řádku 2 (nevím jak zapracovat tu proměnou řádku) pak ho odstranil a tím mohl znova pracovat s řádkem 2, ale to je nevhodné a po té sem se v tom nějak zamotal a takto to dopadlo.
Sem úplný amatér a makra okoukávám různě z netu, tak že se nedivte co jsme to vytvořil.

PS: makro A a B není součástí - pro ukázku stačí jen vyskočení MSG "A" nebo "B"

Příloha: zip43552_1111.zip (135kB, staženo 23x)
Zaslat odpověď >

#043569
avatar
Něco takového?

Do Until ActiveCell.Value = Empty
i = MsgBox("Je to muž?" & Chr(13) & Chr(10) _
& "SML: " & Cells(ActiveCell.Row, 1) & Chr(13) & Chr(10) _
& "Jméno: " & Cells(ActiveCell.Row, 2) & Chr(13) & Chr(10) _
& "Příjmení: " & Cells(ActiveCell.Row, 3), vbYesNoCancel, " pokračovat")
Select Case i
Case vbNo
MsgBox "Dopln_zena"
Case vbYes
MsgBox "Dopln_muz"
Case vbCancel
Exit Do
End Select
ActiveCell.Offset(1, 0).Select
Loop
Příloha: zip43569_2222.zip (138kB, staženo 20x)
citovat
#043571
avatar

birgis napsal/a:

Něco takového?


Supr děkuji moccitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09