Anzeige
Archiv - Navigation
368to372
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
368to372
368to372
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wert aus geschlossener AB per VBA in Variable

Wert aus geschlossener AB per VBA in Variable
25.01.2004 12:26:35
Klaus K.
Hallo Leute,
Die nachstehende Variable funktioniert nur bei geöffneter AB.
DBC = Workbooks("Key1.xls").Sheets("Key").Cells(col + 1, 1).Value
Wie kann ich den Wert übernehmen ohne die Mappe zu öffnen?
Diese liegt in:
ThisWorkbook.Path & "\Dat\Key1.xls"
Besten Dank schonmal.
Gruss
Klaus

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert aus geschlossener AB per VBA in Variable
25.01.2004 12:38:19
Hajo_Zi
Hallo Klaus
für Dein Wiisenstand hast Du Dir ganz schon was vorgenommen.
Option Explicit
' von Alf Herber Forum
' https://www.herber.de/forum/archiv/52to56/t52834.htm#52840
Sub TestGetValue()
Dim p As String
Dim f As String
Dim s As String
Dim r As String
p = "D:\Eigene Dateien\Hajo\"
f = "Adresse.xls"
s = "Adresse"
r = "B4"
MsgBox GetValue(p, f, s, r)
Worksheets("Tabelle1").Range("A1") = GetValue(p, f, s, r)
End Sub


Private Function GetValue(path, file, sheet, ref)
'   Retrieves a value from a closed workbook
Dim arg As String
'   Make sure the file exists
If Right(path, 1) <> "\" Then path = path & "\"
If Dir(path & file) = "" Then
GetValue = "File Not Found"
Exit Function
End If
'   Create the argument
arg = "'" & path & "[" & file & "]" & sheet & "'!" & _
Range(ref).Range("A1").Address(, , xlR1C1)
'   Execute an XLM macro
GetValue = ExecuteExcel4Macro(arg)
End Function


Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro


Anzeige
AW: Wert aus geschlossener AB per VBA in Variable
25.01.2004 14:19:46
Klaus K.
Danke Dir,
aber geht das nicht auch ohne Funktion?
Gruss
Klaus
AW: Wert aus geschlossener AB per VBA in Variable
25.01.2004 14:22:57
Hajo_Zi
Hallo Hlaus
aus Deiner Beschreibung habe ich entnommen das Du es mit VBA machen willst.. Du kannst die Zelle auch einfach in Excel Verknüpfen.

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro


317 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige