Bezug fehlt!

Bild

Betrifft: Bezug fehlt!
von: Thorsten
Geschrieben am: 09.04.2005 14:44:32
Liebe Excel-Community,
folgendes eher grundsätzliches Problem habe ich: In Tabelle1 werden regelmäßig neue Daten per Makro reinkopiert. Dann fehlt aber meinen Formeln in Tabelle2, SVerweisen u.ä., jedoch immmer der Bezug. Kann ich diese Formeln nicht auch per Makro programmieren?
VG, Thorsten

Bild

Betrifft: AW: Bezug fehlt! - Bsp
von: Thorsten
Geschrieben am: 09.04.2005 14:53:37
Bsp.: Aus der recht simplen Fromel B2=Tabelle1!A2 wird B2=Tabelle1!#BEZUG!. Was kann man da machen?
VG, Thorsten
Bild

Betrifft: AW: Bezug fehlt! - Bsp
von: Jörg Gradert
Geschrieben am: 09.04.2005 15:05:47
Hallo Thorsten,
Du kannst, um das Problem zu umgehen indirekt adressieren, z.B.
=INDIREKT("Tabelle1!A1")
oder
=INDEX(Tabelle1!A:A;1)
Gruß Jörg
Bild

Betrifft: AW: Bezug fehlt! - Bsp
von: Thorsten
Geschrieben am: 09.04.2005 15:12:58
Erstmal danke. Die INDEX-Formel funktioniert nach dem "Daten_einfügen"-Makro nicht, fehlt der Bezug. Die INDIREKT-Formel funktioniert nur für eine Zelle. Wie kann ich aber diese Formel runterziehen, so dass sie auch für A2-A250 funktioniert. Irgendwie steht A2 fest.
VG, Thorsten
Bild

Betrifft: AW: Bezug fehlt! - Bsp
von: Jörg Gradert
Geschrieben am: 09.04.2005 16:21:20
Hallo Thorsten,
die INDEX() Formel sollte genauso funktionieren, zu deiner Frage z.B. so
=INDIREKT("Tabelle1!A"&ZEILE(A1))
Gruß Jörg
Bild

Betrifft: AW: Bezug fehlt!
von: paula
Geschrieben am: 09.04.2005 15:08:31
hi thorsten
du kannst Formeln in einer zelle programieren
oder
zellen kopieren und einfügen mit "inhalte einfügen--->alles"
per vBA

Sub Beispiel_Formel hineinschreiben()
    ActiveCell.FormulaR1C1 = "=SUM(Tabelle2!RC[2]:R[9]C[2])" 'Beispiel für SUMME
End Sub



Sub Beispiel_Zellenmit Formelkopieren()   'nur ein Beispiel
    Sheets("Tabelle1").Select             'Anpassen bitte!
    Range("A1").Select
    Selection.Copy
    Sheets("Tabelle3").Select
    Range("A1").Select
    'jetzt kommt Inhalte einfügen
    Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
        , Transpose:=False
End Sub

gruss paula
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Listbox"