Sprung zu einer Zelle mit Variable

Computer: Software & Programmierung Office Software
1

Hallo,

also ich habe da mal eine Frage. Am besten ich schilder mein Problem anhand eines kleinen Beispiels.

Ich habe in A1 = 6
und in A2 will ich den Inhalt von B6 schreiben. Wobei die Zeile 6 bei B immer gleich A1 sein soll.

Also wenn in A1 = 7 steht soll in in A2 der Inhalt von B7 reingeschrieben werden.
Wie kann ich das machen? Am besten ohne Makros.

2

Lösung mit Makro

Hallo,

Hi,
erstelle ein Modul. Füge den Quelltext ein:

Public Function XWert(ByVal Reihe As Integer, ByVal Spalte As Integer) As String
XWert = Cells(Reihe, Spalte).Value
End Function

in die Zelle A2 schreibst du: =Xwert(A1;2)

Gruß.Timo

3

Ich habe in A1 = 6
und in A2 will ich den Inhalt von B6 schreiben. Wobei die
Zeile 6 bei B immer gleich A1 sein soll.
Also wenn in A1 = 7 steht soll in in A2 der Inhalt von B7
reingeschrieben werden.
Wie kann ich das machen? Am besten ohne Makros.

Hi Patric,
in A2:
=INDIREKT(„B“&A1)
Gruß
Reinhard

4

Public Function XWert(ByVal Reihe As Integer, ByVal
Spalte As Integer) As String
XWert = Cells(Reihe, Spalte).Value
End Function

Hallo Timo,
…ByVal Reihe As Integer…
birgt aber Fehlergefahren.
Gruß
Reinhard

5

Danke Reinhard!

Aber eine kleien Frage habe ich noch, wie kann ich mit INDIREKT auf ein anderes Tabellenblatt zugreifen?
=Blatt1!INDIREKT(„B“&A1) funktioniert nicht

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

6

=Blatt1!INDIREKT(„B“&A1) funktioniert nicht

Hi Patric,
=INDIREKT(„Tabelle2!B“&A1)
Gruß
Reinhard