Hallo,
Wenn ich in Zelle B1 einen Zellbezug mache z.B.: auf Zelle A1.
Nun verschiebe ich die Zelle auf G1. Verschiebt Excel den Zellenbezug Automatisch mit auf G1
Nun meine Frage:
Läst sich in Vba es irgendwie einrichten das der Zellbezug auch Automatisch aktualisiert wird, wenn die Zelle Verschoben wird?
Gruß Fred
Läst sich in Vba es irgendwie einrichten das der Zellbezug
auch Automatisch aktualisiert wird, wenn die Zelle Verschoben
wird?
Hallo Fred,
meinst du das so?
Sub tt()
Range(„G1“).Formula = Range(„B1“).Formula
End Sub
Gruß
Reinhard
Hallo Reinhard,
in G1 steht eine Formel ,Text oder ein Wert, was immer auch.
damit ich in vba die Zelle G1 auslessen kann, schreibe ich im code.
.Range(„G1“).value
jetzt wird aber die Zelle G1 auf B10 verschoben mit hilfe auschschneiden und einfügen.
dan muß ich im code händisch den zellbezug von
.Range(„G1“).value
auf
.Range(„B10“).value
ab ändern.
gibts dazu eine lösung. das sich der zellbezg im code, automatisch mit ab ändert??
gruß fred
in G1 steht eine Formel ,Text oder ein Wert, was immer auch.
jetzt wird aber die Zelle G1 auf B10 verschoben mit hilfe
auschschneiden und einfügen.
gibts dazu eine lösung. das sich der zellbezg im code,
automatisch mit ab ändert??
Hallo Fred,
mir fällt dazu nur ein daß du für G1 einen namen, Z.B. MyName vergibst, auslesen dann mit
MsgBox Range(„MyName“).Value
Gruß
Reinhard
Hallo Reinhard
mir fällt dazu nur ein daß du für G1 einen namen, Z.B. MyName
vergibst, auslesen dann mit
hab ich auch schon angewandt.
der artikel
ecxel Sheet Spalten aus blenden und speeren
stammt von mir.
es war nähmlich, nur einteil von den ganzen code.
innerhalb der
Private Sub Worksheet_Change(ByVal Target As Range)
befinden sich 5 if abfragen. da nur eine das sheet nicht mehr speert, der if abfragen. dachte ich es liege an dem gebosteten code.
wie du geschrieben hast, findest keinen fehler im code.
da hab ich den ganzen code zerlegt bin darauf gekommen, das es genau an den defenierten namen liegt, das er mir das sheet nicht wieder speert.
ich weiß nicht warum es ist eben so!
Gruß und danke fred
innerhalb der
Private Sub Worksheet_Change(ByVal Target As Range)
befinden sich 5 if abfragen. da nur eine das sheet nicht mehr
speert, der if abfragen. dachte ich es liege an dem gebosteten
code.
wie du geschrieben hast, findest keinen fehler im code.
Hallo Fred,
ich habe mich falsch ausgedrückt. Ob jetzt irgendwelche Codefehler in den If-Schleifen sind habe ich gar nicht sehr geprüft.
Dein Code-Aufbau ist aber so, daß es ohne Belang ist was in den If-Schleifen geschieht.
Sofern die nicht mit einer Fehlermeldung abbrechen oder ich ein Exit Sub übersehen habe müßte das Blatt wieder gesperrt sein nach Codeablauf.
Gruß
Reinhard
da hab ich den ganzen code zerlegt bin darauf gekommen, das es
genau an den defenierten namen liegt, das er mir das sheet
nicht wieder speert.ich weiß nicht warum es ist eben so!
Gruß und danke fred