inhalt von verbundene Zelle per Macro löschen
Hans W. Herber
was meinst Du mit "verbundene Zelle"? Eine über die LinkedCell-Eigenschaft
einem Steuerelement verbundene Zelle? Wenn ja, sollte der Code
funktionieren.
hans
########################################################
# Herber's Excel-Server - letztes Update: 06.12.98 #
# http://www.herber.de - Microsoft MVP - Excel #
# Neu: Die Mailingliste jetzt mit Demo-Dateien #
########################################################
--
Pascal Bacquet <Pascal....@t-online.de> wrote in message
74dtcn$tm0$1...@news02.btx.dtag.de...
>bei eine Makro Durchführung kommt mir die Meldung:
>Laufzeitfehler "1004"
>Kann Teil einer verbundenen Zelle nicht ändern.
>
>wie soll ich dieses ändern um verbundene Zelle der Inhalt löschen zu
können?
>
>Sub Position_Loeschen()
>
> ActiveSheet.Unprotect
> Zeile = ActiveCell.Row
> Cells(Zeile, 1).ClearContents
> Cells(Zeile, 5).ClearContents
> ActiveSheet.Protect
>
>End Sub
Pascal Bacquet
Laufzeitfehler "1004"
Kann Teil einer verbundenen Zelle nicht ändern.
wie soll ich dieses ändern um verbundene Zelle der Inhalt löschen zu können?
Sub Position_Loeschen()
ActiveSheet.Unprotect
Zeile = ActiveCell.Row
Cells(Zeile, 1).ClearContents
Cells(Zeile, 5).ClearContents
ActiveSheet.Protect
End Sub
MFG Pascal
Pascal Bacquet
Na ja ganz einfach, wenn ich A1 und B1 verbinden
(Format/Zellen/Ausrichtung/Zellen verbinden oder per Knopfdruck Zellen
verbinden und Zentrieren), Kommt mir die oben genannten Fehlermeldung. wenn
ich sie aber wieder trennen dann funktioniert es aber.
Ich habe leider nicht genügend Kenntnisse über VBA um dir bei
"LinkedCell-Eigenschaft" zu beantworten da ich nicht weis was es ist, ich
bin halt ein Anfänger in dieser Richtung.
MFG Pascal
Hans W. Herber schrieb in Nachricht <74eh99$52o$1...@news02.btx.dtag.de>...
>Hallo Pascal,
>
>was meinst Du mit "verbundene Zelle"? Eine über die LinkedCell-Eigenschaft
>einem Steuerelement verbundene Zelle? Wenn ja, sollte der Code
>funktionieren.
>
>hans
>
>########################################################
># Herber's Excel-Server - letztes Update: 06.12.98 #
># http://www.herber.de - Microsoft MVP - Excel #
># Neu: Die Mailingliste jetzt mit Demo-Dateien #
>########################################################
>--
>
>Pascal Bacquet <Pascal....@t-online.de> wrote in message
>74dtcn$tm0$1...@news02.btx.dtag.de...
Hans W. Herber
ok, jetzt verstanden.
Du mußt die verbundenen Zellen als Bereich ansprechen:
Sub Position_Loeschen()
Dim Zeile
ActiveSheet.Unprotect
Zeile = ActiveCell.Row
Range(Cells(Zeile, 1), Cells(Zeile, 2)).ClearContents
Cells(Zeile, 5).ClearContents
ActiveSheet.Protect
End Sub
hans
########################################################
# Herber's Excel-Server - letztes Update: 06.12.98 #
# http://www.herber.de - Microsoft MVP - Excel #
# Neu: Die Mailingliste jetzt mit Demo-Dateien #
########################################################
--
Pascal Bacquet <Pascal....@t-online.de> wrote in message
74f19k$be0$1...@news02.btx.dtag.de...
>Na ja ganz einfach, wenn ich A1 und B1 verbinden
>(Format/Zellen/Ausrichtung/Zellen verbinden oder per Knopfdruck Zellen
>verbinden und Zentrieren), Kommt mir die oben genannten Fehlermeldung.
wenn
>ich sie aber wieder trennen dann funktioniert es aber.
>Ich habe leider nicht genügend Kenntnisse über VBA um dir bei
>"LinkedCell-Eigenschaft" zu beantworten da ich nicht weis was es ist, ich
>bin halt ein Anfänger in dieser Richtung.
>>>Laufzeitfehler "1004"
Pascal Bacquet
Danke, es funktioniert.
Als Laie in VBA, ist Mann immer froh Leute wie dich zu finden das helfen
kann. Ich habe zwar selber nach Lösung experimentiert aber leider ohne
Erfolg.
nochmals Danke
Pascal
Hans W. Herber schrieb in Nachricht <74fpj3$fos$1...@news00.btx.dtag.de>...