Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
180to184
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
180to184
180to184
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

cells, ranges und rechnen damit

cells, ranges und rechnen damit
20.11.2002 16:23:14
Diedrix
hallo cracks,

ich hab ein problemchen.

If Target = Range("B9") Then
Sheets("SC-Cockpit").Select
a = ActiveSheet.Cells(9, 1).Formula
Sheets("Monatschart").Select
ActiveSheet.Cells(5, 1).Formula = a
Else
End If

Dieser Code funzt, aber ich möchte ihn automatisieren.
Ausser B9, soll auch B11, B13,... von mir aus auch alle B:B ebenfalls sensitiv sein. Der zu übertragene Wert steht immer in derselben Zeile ein Feld weiter links. Das Ziel-Feld bleibt immer gleich!

Kennt jemand einen Trick?

Gruss
Diedrix

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: cells, ranges und rechnen damit
20.11.2002 16:34:09
PeterW
Hallo Diedrix,

wenn mehrere Zellen sensitiv sein sollen musst Du das auch so schreiben, beispielsweise if Target.Column=2 (für Spalte B). Eine Zelle kann man relaiv ansprechen mit Offset, steht mit einem guten Beispiel in der VBA-Hilfe.

Gruß
Peter

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige