< návrat zpět

MS Excel


Téma: Nefungující makro rss

Zaslal/a 27.11.2020 21:14

Dobrý večer, nenapadne někoho proč toto makro nefunguje? Určitě není problém v tom, že bych chtěl smazat obsah uzamčené buňky.

Sub SmazVse()
'

If MsgBox("Opravdu chcete smazat všechno?", vbYesNo, "Potvrzení") <> vbYes Then Exit Sub
Sheets("Zaměstnanci").Select
Range("A5:C204,E5:E204,G5:I204,K5:L204,P5:T:204,V5:CJ204,CL5:CL204,CO5:DA204,DH5:DH204,DJ5:DL204,DP5:DQ204,DT5:DV204,DZ5:DZ204,EB5:EB204,ED5:EF204,EH5:EI204,EK5:EK204,GY5:HA204,HL5:HM204,HQ5:ID204,IF5:IQ204,IS5:IS204,IY5:IY204,JA5:JA204,JC5:JE204,JH5:JJ204,JL5:JL204,JW5:JW204,JY1:JY204").ClearContents
End Sub

Příloha: png49054_snimek-obrazovky-2020-11-27-211241.png (5kB, staženo 20x)
49054_snimek-obrazovky-2020-11-27-211241.png
Zaslat odpověď >

#049055
Lugr
Máš tam jednu chybu s dvojtečkou a navíc to máš moc dlouhý.

Tady to máš funkční.

Sub SmazVse()

If MsgBox("Opravdu chcete smazat všechno?", vbYesNo, "Potvrzení") <> vbYes Then Exit Sub
Sheets("Zaměstnanci").Select
Range("A5:C204,E5:E204,G5:I204,K5:L204,P5:T204,V5:CJ204,CL5:CL204,CO5:DA204,DH5:DH204,DJ5:DL204,DP5:DQ204,DT5:DV204,DZ5:DZ204,EB5:EB204,ED5:EF204,EH5:EI204").ClearContents
Range("EK5:EK204,GY5:HA204,HL5:HM204,HQ5:ID204,IF5:IQ204,IS5:IS204,IY5:IY204,JA5:JA204,JC5:JE204,JH5:JJ204,JL5:JL204,JW5:JW204,JY1:JY204").ClearContents

End Sub
citovat
#049056
avatar
Už jsem objevil chybu - omezení počtu znaků a jedna dvojtečka navíc.citovat
#049134
elninoslov
Na spojenie dvoch Range by som použil Union, a tým pádom by všetko aj s ClearContents prebehlo v jednom kroku.citovat

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