|
Hallo Community,
ich hoffe, ihr könnt mir weiterhelfen. Ich werde bald wahnsinnig.
Ich habe zwei Exceldateien.
In Exceldatei A gibt es in Spalte C9 einen Wert (=25). In Exceldatei B möchte ich diesen Wert ebenfalls in C9 widergeben.
In Excel ist die Lösung hierfür ganz einfach:
1. Öffne Exceldatei B und klicke in Zelle C9
2. Ich schreibe = in die Zelle und klicke dann in Zelle C9 der Exceldatei A.
3. Der Link schreibt sich von selbst und die Zahl 25 wird in Datei B angezeigt.
Ich möchte, dass mein Makro diese Verlinkung von selbst in die Zelle C9 von Exceldatei B schreibt.
Dieser Link muss am Ende in meiner Exceldatei B stehen, damit der Wert 25 gezogen wird:
|
='C:\Users\\Documents\VBA_Übung\04_Test\[Planung_04_Motor.xlsm]100'!C9 |
Nun gibt es eine weitere Schwierigkeit:
Mein Link besteht aus zwei String-Variablen.
Die erste Variable heißt "Dateiname"
Die zweite Variable heißt "Arbeitsblattname"
Die Variablen schaffen es richtig auszulesen, d.h.
dateiname = Planung_04_Motor.xlsm
Arbeitsblattname = 100
....................................
Sub Verknüpfung ()
Dim Dateiname as string
Dim Arbeitsblattname as string
'Die Variablen bekommen in diesem Code Abschnitt ihre String-Werte zugewiesen.Das funktioniert.
Range("C9"´).Formula = "='C:\Users\Documents\VBA_Übung\04_Test\[" & Dateiname & "]" & Arbeitsblattname & "'!C9"
End Sub
.......................................
Der Code läuft auf Fehler. Ich vermute, dass das mit dem istgleich oder der eckigen Klammer zu tun hat.
Bitte helft mir =)
Micha
|