Registriert seit: 27.01.2023
Version(en): Office 365
Hallöchen zurück!
ich wüsste jetzt nicht, wo ich den "Helfer" als "hilflos" bezeichnet hätte. Das Wort "wahllos" hatte sich auf mein Ansinnen bezogen, den Code zu verschieben. Ich habe hier zum Ausdruck gebracht, dass ich nicht "wahllos" sondern "hilflos" agiere.
Meinen Dank habe ich im Verlauf schon zum Ausdruck gebracht und ich werde es auch wieder tun, jedoch bin ich nur ein Mensch der arbeiten muss und das leider auch nicht in milisekündlicher Echtzeit.
Ich bedanke mich trotzdem für Ihren konstruktiven Beitrag zur Lösung meines Problems.
Viele Grüße
Registriert seit: 17.04.2014
Version(en): MS Office 365(32)
(14.02.2023, 13:31)schauan schrieb: Hallöchen,
ein anderer hätte sich für die Unterstützung bedankt statt Helfer als hilflos zu bezeichnen ... 
Hat er das? Und wer ist der? "Hallöchen" hab ich im Thema nicht gefunden.
Gruß Uwe
Registriert seit: 27.01.2023
Version(en): Office 365
14.02.2023, 13:49
(Dieser Beitrag wurde zuletzt bearbeitet: 14.02.2023, 13:54 von Candalfo.)
Hallo HKindler,
vielen Dank für Dein Codebeispiel. Es funktioniert sehr gut. Das "Magic" liegt wohl in der FOR-Schleife. Diese muss ich noch für mich erschließen, als Anfänger in VBA ist man mit solchen komplexen Anweisungen noch fremd.
Viele Grüße
Andreas
...ja, das war ja mein Problem. Deswegen bin ich hier
Registriert seit: 28.08.2022
Version(en): 365
Hi,
nein, das Magic ist nicht die For-Schleife. Die dient nur dazu, dass auch die gleichzeitige Änderung mehrerer Zellen sauber durch läuft. Das Magic liegt darin, dass nur die Zellen betrachtet werden, die tatsächlich geändert wurden.
Schlampig programmiert sähe das so aus:
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then Worksheets("Print_MBE").Rows(Target.Row + 6).Hidden = Zelle = ""
If Target.Column = 2 Then Worksheets("Print_DDC").Rows(Target.Row + 6).Hidden = Zelle = ""
End Sub
Mit dem Ergebnis, dass das gleichzeitige Ändern mehrerer Zellen zu unerwarteten Ergebnissen führen würde.
Gruß,
Helmut
Win10 - Office365 / MacOS - Office365
Folgende(r) 1 Nutzer sagt Danke an HKindler für diesen Beitrag:1 Nutzer sagt Danke an HKindler für diesen Beitrag 28
• Candalfo
Registriert seit: 10.04.2014
Version(en): 97-2019 (32) + 365 (64)
14.02.2023, 14:45
(Dieser Beitrag wurde zuletzt bearbeitet: 14.02.2023, 14:59 von schauan.)
@Uwe,
so entstehen Mißverständnisse ...
ohne Anrede, dann
Zitat:Irgendwelche Prozeduren wahllos irgendwohin zu verschieben hat EarlFred garantiert nicht gesagt und noch garantierter nicht gemeint.
--> ...ich würde es als "hilflos" bezeichnen, aber wie schon gesagt...aller Anfang ist schwer
sorry an den TE
. \\\|/// Hoffe, geholfen zu haben.
( ô ô ) Grüße, André aus G in T
ooO-(_)-Ooo (Excel 97-2019+365)
26865
Nicht registrierter Gast
(14.02.2023, 13:41)Candalfo schrieb: "wahllos"
…bezieht sich darauf, dass der besagte Code an nur einer Stelle stehen kann. In vielen anderen Fällen besteht Wahlfreiheit, hier aber eben nicht.