< návrat zpět

MS Excel


Téma: Vymaž data z neuzamčených buněk rss

Zaslal/a 5.4.2018 9:10

AlfanDobrý den, lze nějakým jednoduchým makrem vymazat data z neuzamčených buněk?
Na listu se do odemknutých buněk zadávají data. Těch buněk je ale hodně a proto by se hodilo právě vymazat data z těch neuzamčených buněk.
Děkuji.

Zaslat odpověď >

Strana:  « předchozí  1 2
#040078
avatar
No, mezi námi děvčaty, možná kdybyste uložil čistý sešit jako šablonu, tak jste makro taky nepotřeboval...citovat
#040079
Alfan
To je pravda 1citovat
#040119
Alfan
Mohl byste mi někdo, prosím, upravit to makro tak, aby to vymazalo na všech listech v otevřeném sešitu.
Sub Vymaz_nezamcene_bunky()

For Each c In ActiveSheet.UsedRange

If c.Locked = False Then c.Value = ""

Next

End Sub


Děkuji.citovat
#040122
Stalker
Sub Vymaz_nezamcene_bunky_v_listech()
Dim c As Range
Dim List As Worksheet

For Each List In ThisWorkbook.Worksheets
For Each c In List.UsedRange
If c.Locked = False Then c.Value = ""
Next c
Next List

End Sub
citovat
#040123
Alfan
Díky 1citovat
#040124
avatar
Mně na to mazání funguje velmi prosté makro:

On Error Resume Next
ActiveSheet.UsedRange = ""citovat

Strana:  « předchozí  1 2

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura III

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

Aktivní diskuse

VBA mazani dat s podminou

Merlin99 • 21.1. 7:56

automatické vyplnění sloupce

elninoslov • 20.1. 23:27

VBA mazani dat s podminou

elninoslov • 20.1. 22:51

Součty přes 50 souborů

mepexg • 20.1. 21:12

automatické vyplnění sloupce

ragus • 20.1. 19:14

Součty přes 50 souborů

Stepanek100 • 20.1. 19:00

VBA mazani dat s podminou

Merlin99 • 20.1. 17:45