Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellen Position ermitteln

Forumthread: Zellen Position ermitteln

Zellen Position ermitteln
28.08.2003 20:35:50
Holger
Hallo,

Weiss jemand, ob man bei Excel die Position einer Zelle ermitteln kann. Ich meine nicht in welcher Zeile oder Spalte sie sich befindet, sondern wie weit sie von oben und links (top & left) entfernt ist, wie hoch und wie breit (weidth & height) sie ist...
Geht das ?
Gruss Holger
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen Position ermitteln
28.08.2003 20:41:40
Ramses
Hallo

mit

ActiveCell.ColumnWidth

und

ActiveCell.RowHeight

kannst du Breite und Höhe ermitteln, aber die Top und Left Eigenschaft gibt es für Zellen nicht.
Das kannst du nur indirekt ermitteln, indem du die Höhen aller Zellen oberhalb und Breiten aller Spalten links von der Zelle addierst.

Allerdingst bezieht sich diese Position immer noch nur auf die Platzierung innerhalb der Tabelle. Da diese Im Fenstermodus laufen kann, genauso wie das EXCEL Fenster selber, ist keine exacte Positionsberechnung möglich.

Gruss Rainer
Anzeige
AW: Zellen Position ermitteln
28.08.2003 21:34:11
Holger
Danke schoen :-)
Merci fürs Feedback :-) o.T.
28.08.2003 21:58:07
Ramses
...
AW: Zellen Position ermitteln
28.08.2003 22:32:34
K.Rola
Hallo,

das kann so natürlich nicht stehen bleiben:

"aber die Top und Left Eigenschaft gibt es für Zellen nicht."

Die gibts schon, allerdings mit der Einschränkung, dass sich
das auf die Tabelle, nicht den Bildschirm bezieht.

Gruß K.Rola
Anzeige
AW: Zellen Position ermitteln
29.08.2003 10:06:15
Ramses
Hallo K.Rola,

dann zeig mir bitte ein Beispiel :-)

Gruss Rainer
AW: Zellen Position ermitteln
29.08.2003 13:03:18
K.Rola
Hallo,

msgbox [d24].left & " " & [d24].top

Gruß K.Rola
:-((
29.08.2003 13:25:16
Ramses
Hallo K.Rola

das habe ich natürlich auch schon probiert.
Da erhalte ich allerdings die Fehlermeldung

"Das Object unterstützt diese Eigenschaft nicht"

Läuft das bei Dir ?

Gruss Raienr
Anzeige
AW: :-((
29.08.2003 14:01:05
K.Rola
Hallo,

ja klar, sonst würde ich dir doch sowas nicht zumuten.
Bei dir geht ja auch Zufallsbereich nicht. Womöglich
ist an deiner Installation was verbogen.

Gruß K.Rola
Tut tatsächlich...
29.08.2003 22:17:15
Ramses
Hallo K.Rola

da werde ich wohl mal neu installieren müssen :-(
Offensichtlich ist da wirklich was verbogen.

Danke

Gruss Rainer
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Zellenposition in Excel ermitteln


Schritt-für-Schritt-Anleitung

Um die Position einer Zelle in Excel zu ermitteln, kannst du die folgenden Schritte ausführen:

  1. Öffne Excel und erstelle ein neues Arbeitsblatt oder öffne ein bestehendes.

  2. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  3. Füge ein neues Modul hinzu:

    • Klicke mit der rechten Maustaste auf "VBAProject" und wähle "Einfügen" > "Modul".
  4. Gib den folgenden Code ein:

    Sub ZellePositionErmitteln()
       Dim zelle As Range
       Set zelle = ActiveCell ' oder spezifische Zelle angeben, z.B. Range("D24")
    
       MsgBox "Top: " & zelle.Top & vbCrLf & "Left: " & zelle.Left & vbCrLf & _
              "Höhe: " & zelle.RowHeight & vbCrLf & "Breite: " & zelle.ColumnWidth
    End Sub
  5. Führe das Makro aus:

    • Gehe zurück zu Excel, wähle die gewünschte Zelle aus und drücke ALT + F8, wähle "ZellePositionErmitteln" und klicke auf "Ausführen".

Jetzt siehst du ein Pop-up, das die Position der Zelle sowie deren Höhe und Breite anzeigt.


Häufige Fehler und Lösungen

  • Fehlermeldung: "Das Object unterstützt diese Eigenschaft nicht"

    • Überprüfe, ob du die richtige Zelle ausgewählt hast und dass das Makro korrekt eingegeben wurde. Stelle sicher, dass du die richtige Zelle ansteuerst.
  • Ungenaue Werte für Top und Left

    • Beachte, dass die Werte für Top und Left die Position innerhalb der Tabelle und nicht auf dem Bildschirm angeben. Diese Werte sind relativ zur Tabelle und nicht zur Fenstergröße.

Alternative Methoden

Eine alternative Methode zur Ermittlung der Zellenposition ist, die Position durch die Addition der Breiten und Höhen der Zellen zu berechnen, die sich über und links der gewünschten Zelle befinden. Hier ist ein Beispiel:

Function BerechnePosition(zelle As Range) As String
    Dim totalTop As Double
    Dim totalLeft As Double
    Dim i As Long

    ' Berechnung der Höhe
    For i = 1 To zelle.Row - 1
        totalTop = totalTop + Rows(i).RowHeight
    Next i

    ' Berechnung der Breite
    For i = 1 To zelle.Column - 1
        totalLeft = totalLeft + Columns(i).ColumnWidth
    Next i

    BerechnePosition = "Top: " & totalTop & ", Left: " & totalLeft
End Function

Praktische Beispiele

Hier sind einige Beispiele, wie du die Position einer Zelle ausgeben kannst:

  1. Position einer bestimmten Zelle ausgeben:

    MsgBox BerechnePosition(Range("D24"))
  2. Aktive Zelle verwenden:

    MsgBox BerechnePosition(ActiveCell)

Diese Funktionen ermöglichen dir, die Excel-Position einer Zelle zu ermitteln und bequem auszugeben.


Tipps für Profis

  • Nutze Named Ranges: Wenn du häufig auf bestimmte Zellen zugreifen musst, erstelle benannte Bereiche, um die Lesbarkeit und Wartung deines VBA-Codes zu verbessern.
  • Verwende Fehlerbehandlung: Inkludiere Fehlerbehandlungsroutinen in deinen VBA-Skripten, um sicherzustellen, dass dein Code auch bei unerwarteten Eingaben stabil bleibt.
  • Optimierung: Wenn du viele Zellen abfragst, erwäge, die Berechnungen zu optimieren, um die Performance zu verbessern.

FAQ: Häufige Fragen

1. Kann ich die Position einer Zelle in allen Excel-Versionen ermitteln? Ja, die beschriebenen Methoden funktionieren in den meisten modernen Excel-Versionen, die VBA unterstützen.

2. Was mache ich, wenn das Makro nicht funktioniert? Überprüfe den Code auf Tippfehler und stelle sicher, dass die Zelle, auf die du zugreifst, tatsächlich existiert und korrekt referenziert wird.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige