Nur bei leeren Zellen den Zellenschutz entfernen

[Rabe]

Hi,

Code:

  With ws
     
     With .Range("A5:A64"): .Value = .Value: End With
     With .Range("A72:A131"): .Value = .Value: End With
     With .Range("A137:A198"): .Value = .Value: End With
     With .Range("A206:A265"): .Value = .Value: End With
     With .Range("A273:A332"): .Value = .Value: End With
     With .Range("A338:A397"): .Value = .Value: End With
     With .Range("A403:A462"): .Value = .Value: End With
     With .Range("A468:A527"): .Value = .Value: End With
     With .Range("A533:A592"): .Value = .Value: End With
     With .Range("A598:A657"): .Value = .Value: End With
   
  End With

zu was sind die inneren With? Warum sind da Doppelpunkte?

[Daniel Albert]

Guten Morgen,

das kann ich dir nicht sagen, hat ein anderer User damals für mich erstellt. Ich verstehe es leider nicht daher bin ich nur froh das es dieses Forum gibt und ich immer eine Lösung bekomme

[Käpt'n Blaubär]

Hall0 Ralf,

zu was sind die inneren With? Warum sind da Doppelpunkte?

Die Doppelpunkte heißen soviel wie "neue Zeile".

Es sind also ganz normale With-Anweisungen, nur etwas anders geschrieben.

[Rabe]

Hi Peter,

Die Doppelpunkte heißen soviel wie "neue Zeile".

Es sind also ganz normale With-Anweisungen, nur etwas anders geschrieben.

aaah, ok, danke.