Thema Datum  Von Nutzer Rating
Antwort
17.03.2015 11:10:08 BobbtimusPrime
NotSolved
Blau Rückgabewert einer Excel Funktion in Access
17.03.2015 11:48:41 BobbtimusPrime
Solved

Ansicht des Beitrags:
Von:
BobbtimusPrime
Datum:
17.03.2015 11:48:41
Views:
994
Rating: Antwort:
 Nein
Thema:
Rückgabewert einer Excel Funktion in Access

Okay Ich habe das Problem selbst gelöst. 

Falls es jemand braucht: 

Anstatt in Excel eine Funktion mit Rückgabewert zu benutzen habe ich ein Makro mit Übergabeparameter der ByRef übergeben wird. 

Public Sub GetTimes(ByRef Data() As String)
       ' Auslesen von Zellen usw. ..
       Data = Array
End Function

In Access gebe ich jetzt nur noch eine leere Variable als Parameter mit!

For I = 1 To Pfade.count
 ' Sonstiger Code
        Set Excel = CreateObject("Excel.Application")
        If Excel Is Nothing Then
            MsgBox "Konnte keine Verbindung zu Excel herstellen!", 16, "Problem"
            Exit Sub
        End If
        With Excel
          .visible = False
          .Workbooks.Open Pfade(I)

          DataSet = .Application.run "GetTimes", LeeresArray
 
        End With
        Set Excel = Nothing
Next I

Der Inhalt des Arrays wird nun auf LeeresArray übertragen!


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
17.03.2015 11:10:08 BobbtimusPrime
NotSolved
Blau Rückgabewert einer Excel Funktion in Access
17.03.2015 11:48:41 BobbtimusPrime
Solved