Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Array aus anderer Datei auslesen

Frage Entwicklung VB for Applications

Mitglied: jaydotkay

jaydotkay (Level 1) - Jetzt verbinden

02.04.2014, aktualisiert 14:54 Uhr, 1085 Aufrufe, 2 Kommentare

Hallo liebe Leute,

ich würde gerne von einem Makro aus ein Datenfeld auslesen, dass in einer anderen Datei liegt.

Genauer:
'das Makro startet ein Makro in einer anderen Datei:
Workbooks.Open strSelectedItem
ActiveWorkbook.Application.Run strSub1
'dort wird u.a. das Public Array strFilesList() mit Dateinamen befüllt. diese Liste von Dateien soll im Hauptmakro zur Verfügung stehen
'Mein Versuch bspw:
MsgBox ActiveWorkbook.strFilesList(1)
'hätte ja klappen können Weiß jemand wie das geht?

Danke und viele Grüße!
Mitglied: colinardo
LÖSUNG 02.04.2014, aktualisiert um 14:54 Uhr
Hallo jaydotkay,
du könntest aus dem Makro deiner anderen Datei eine Function machen welche am Schluss das Array zurückliefert, dann kannst du es im aktuellen Makro weiterverwenden.

Beispiel:
01.
Dim wb2 As Workbook 
02.
' das zweite Workbook soll jetzt mal die andere Datei sein 
03.
Set wb2 = Workbooks(2) 
04.
' Dort rufen wir dann unsere Funktion auf die uns als Ergebnis das Array liefert 
05.
retArray = wb2.MyTestfunction 
06.
' Testweise einen Wert aus dem Array ausgeben 
07.
msgbox retArray(0)
Beispiel Funktion in Workbook 2
01.
Dim strListFiles(2) 
02.
Public Function MyTestfunction() 
03.
    ' dem Array Werte zuweisen 
04.
    strListFiles(0) = "Wert1" 
05.
    strListFiles(1) = "Wert2" 
06.
    ' das Array zurückgeben 
07.
    MyTestfunction = strListFiles 
08.
End Function
Grüße Uwe
Bitte warten ..
Mitglied: jaydotkay
02.04.2014 um 14:54 Uhr
....so, endlich.

Hat geklappt! Uwe, vielen Dank, das war sehr hilfreich!

wb2.MyTestfunction
konnte mein VBA allerdings nicht lesen. Ich musste schreiben
retArray = wb2.Application.Run("'Dateipfad'!MyTestfunction")

Nochmal vielen Dank!
MfG
jaydotkay
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Leere Array-Werte aus einem Array entfernen (3)

Frage von ToniHo zum Thema Batch & Shell ...

Batch & Shell
gelöst Datei zeilenweise auslesen - es passiert aber nichts (3)

Frage von Nagus zum Thema Batch & Shell ...

Neue Wissensbeiträge
Linux Netzwerk

Ping und das einstellbare Bytepattern

(1)

Erfahrungsbericht von LordGurke zum Thema Linux Netzwerk ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(3)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Microsoft Office
Office Druck fehler (18)

Frage von DaistwasimBusch zum Thema Microsoft Office ...

Netzwerkmanagement
Windows Server 2008 R2: "netsh reset" nicht verfügbar? (11)

Frage von RickTucker zum Thema Netzwerkmanagement ...

Festplatten, SSD, Raid
Uninitialisierte Festplatte - Daten retten (11)

Frage von peterla zum Thema Festplatten, SSD, Raid ...

Microsoft Office
Outlook 2016 in Ordneransicht starten - GPO (9)

Frage von D-Line zum Thema Microsoft Office ...