Wert aus markierter Zelle wiedergeben

Forumthread: Wert aus markierter Zelle wiedergeben

23.02.2004 13:16:02

Marco

Hallo Ihr,
habe ein kleines Problem.
Die Zelle A1 soll mir immer den Wert der Zelle in Spalte B anzeigen, auf der ich mich gerade befinde.
Gibt es hier eine Lösung die nach Möglichkeit ohne VBA zurecht kommt.
Vielen Dank für eure Hilfe.
Grüße
marco

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Wert aus markierter Zelle wiedergeben

23.02.2004 13:40:58

Galenzo

Hallo,
nö - da führt wohl kein Weg an VBA vorbei.
Ist aber nicht schlimm:
Klicke auf den Registerreiter der Tabelle (unten links) und wähle "Code anzeigen".
Du solltest im VBA-Editor in einem leeren Fenster landen.
Oben steht in einer Combobox "(Allgemein)" - dort wählst du "WorkSheet".
Der VBA-Editor legt nun für dich die Ereignisprozedur "Worksheet_SelectionChange" an.
Diese wird immer dann abgearbeitet, wenn eine andere Zelle in deinem Blatt ausgewählt wird.
Nun der Code, der dan nso aussieht:


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 Then [a1].Value = ActiveCell.Value
End Sub

- also nur EINE Zeile!
Diese heißt soviel wie:
Wenn die Spaltennummer der gerade angewählten Zelle 2 ist (also Spalte B),
dann trage in der Zelle A1 den Wert aus der gerade gewählten Zelle ein.
Das war's auch schon.
Viel Erfolg - und Spaß mit VBA!!

AW: Wert aus markierter Zelle wiedergeben

23.02.2004 13:41:01

Ulf_MS

Hi Marco,
mach es mit VBA ist leichter!:)
Mit ALT+F11 VBA öffnen. Dann die Tabelle links im Explorer herraussuchen. Einmal anclicken und folgendes reinschreiben


Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
[a1] = Target.Value
End Sub

mfg
Ulf_MS

AW: Wert aus markierter Zelle wiedergeben

23.02.2004 13:41:27

harry

hallo marco,
ohne vba weiss ich keine lösung. mit vba schon: folgenden code im vba editor bei "Microsoft Excel Objekte" in die arbeitsmappe kopieren, in der deine daten stehen:


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Column = 2 Then
ActiveSheet.Range("a1").Value = Selection
Else: ActiveSheet.Range("a1").Value = ""
End If
End Sub

liebe grüße,
harry

AW: Wert aus markierter Zelle wiedergeben

23.02.2004 14:40:23

Marco

OK, dann mach´n wir´s halt mit VBA.
Vielen Dank für die Tipps.
Grüße
Marco

Infobox / Tutorial

Wert aus markierter Zelle wiedergeben in Excel

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Um den Wert der markierten Zelle in Excel anzuzeigen, kannst du VBA verwenden. Hier sind die Schritte:

Öffne den VBA-Editor:
- Drücke ALT + F11 in Excel, um den VBA-Editor zu öffnen.
Wähle das Arbeitsblatt aus:
- Suche im Projekt-Explorer auf der linken Seite das Arbeitsblatt, auf dem du arbeiten möchtest, und klicke darauf.

Füge den Code ein:

Kopiere den folgenden VBA-Code in das leere Fenster:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If Target.Column = 2 Then [A1].Value = Target.Value
End Sub

Speichere die Datei:
- Achte darauf, die Datei im .xlsm-Format (Makro-fähige Arbeitsmappe) zu speichern.
Teste den Code:
- Kehre zurück zu deinem Arbeitsblatt und wähle eine Zelle in Spalte B aus. Der Wert dieser Zelle sollte jetzt in A1 angezeigt werden.

Häufige Fehler und Lösungen

Fehler: Der Wert in A1 ändert sich nicht.
- Lösung: Stelle sicher, dass der Code im richtigen Arbeitsblatt eingefügt wurde und die Datei als .xlsm gespeichert ist.
Fehler: VBA wird nicht ausgeführt.
- Lösung: Überprüfe, ob Makros in deinen Excel-Einstellungen aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Trust Center-Einstellungen > Makroeinstellungen.

Alternative Methoden

Wenn du VBA nicht verwenden möchtest, gibt es keine direkte Möglichkeit, den Wert der markierten Zelle ohne VBA anzuzeigen. Eine mögliche Workaround-Lösung wäre die Verwendung von Formeln, jedoch ist dies nicht so dynamisch wie die VBA-Option.

Praktische Beispiele

Hier sind einige Beispiele, wie du den oben genannten Code anpassen kannst:

Nur bestimmten Bereich überwachen:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If Not Intersect(Target, Me.Range("B1:B10")) Is Nothing Then
       [A1].Value = Target.Value
   End If
End Sub

Wert löschen, wenn außerhalb von Spalte B:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If Target.Column = 2 Then
       [A1].Value = Target.Value
   Else
       [A1].Value = ""
   End If
End Sub

Tipps für Profis

Fehlerbehandlung: Du kannst Fehlerbehandlungen hinzufügen, um sicherzustellen, dass dein Code stabil läuft.
```
On Error Resume Next
```
Testen in verschiedenen Excel-Versionen: Achte darauf, dass der Code in verschiedenen Excel-Versionen getestet wird, um die Kompatibilität zu gewährleisten.

FAQ: Häufige Fragen

1. Kann ich den Wert auch in einer anderen Zelle anzeigen? Ja, ändere einfach die Zelle [A1] im Code zu der gewünschten Zielzelle.

2. Ist es möglich, den Wert nur zu speichern und nicht anzuzeigen? Ja, du kannst den Wert in einer Variablen speichern, anstatt ihn in eine Zelle zu schreiben.

Beliebteste Forumthreads (12 Monate)

Wert aus markierter Zelle wiedergeben

Forumthread: Wert aus markierter Zelle wiedergeben

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Wert aus markierter Zelle wiedergeben in Excel

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

Wert aus markierter Zelle wiedergeben

Forumthread: Wert aus markierter Zelle wiedergeben

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Wert aus markierter Zelle wiedergeben in Excel

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread