• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

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

Zaslal/a Alfan 5.4.2018 9:10

Dobrý 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

xlnc(6.4.2018 18:03)#040078

No, mezi námi děvčaty, možná kdybyste uložil čistý sešit jako šablonu, tak jste makro taky nepotřeboval...citovat

Alfan(6.4.2018 18:11)#040079

To je pravda citovat

Alfan(14.4.2018 13:40)#040119

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

Stalker(14.4.2018 22:31)#040122

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 Subcitovat

Alfan(15.4.2018 10:00)#040123

Díky citovat

Vovka(15.4.2018 12:43)#040124

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)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse