Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
652to656
652to656
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

aktive Zelle in Spalte A ?

Forumthread: aktive Zelle in Spalte A ?

aktive Zelle in Spalte A ?
19.08.2005 12:40:07
Johannes
Hallo Freunde,
in meiner Tabelle stehen in der Spalte A die Artikel. Über die Variable "Art" hole ich mir den Inhalt der aktiven Zelle.
Art = ActiveCell.Value
Im folgenden wird der Inhalt der Variablen "Art" in ein Berechnungsschema eingefügt. Wenn allerdings die aktive Zelle nicht in Spalte A steht, kommt zwangsläufig nur Unsinn heraus. Frage nun: wie muss ich eine IF Abfrage gestalten, dass der folgende Ablauf nur durchgeführt wird, wenn die Aktive Zelle aus der Spalte A kommt?
Für Eure Hilfe einstweilen schon mal vielen Dank.
Gruß
Johannes
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: aktive Zelle in Spalte A ?
19.08.2005 12:43:24
Matthias
Hallo Johannes,
entweder so:
If Intersect(Range("A:A"),ActiveCell) Is Nothing Then
MsgBox "Nicht in A"
Else
MsgBox "in A"
End If
oder du holst du die Zelle in Spalte A:
Art = Cells(ActiveCell.Row, 1)
Gruß Matthias
AW: aktive Zelle in Spalte A ?
19.08.2005 12:43:29
Ramses
Hallo
If ActiveCell.Column 1 Then
msgbox "Active Zelle nicht in spalte A"
Exit sub
Else
Art = ActiveCell.Value
end If
Gruss Rainer
Anzeige
AW: aktive Zelle in Spalte A ?
19.08.2005 12:43:40
ransi
hallo johannes

Sub was weiss ich()
if activecell.column=1 then
'code
end if
End Sub

oder

Sub was weiss ich()
if activecell.column<>1 then exit sub
code
End Sub

AW: aktive Zelle in Spalte A ?
19.08.2005 12:44:22
Harry
Hallo Johannes
if activecell.column = 1 then ...
Gruß
Harry
Anzeige
AW: aktive Zelle in Spalte A ?
19.08.2005 12:45:24
Martina
so in etwa:
If ActiveCell.Column = 1 Then
'was immer die Kiste machen soll
Else
Exit Sub
End If
MfG
Martina
Herzlichen Dank an alle owT
19.08.2005 13:00:55
Johannes
.
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige