Thema Datum  Von Nutzer Rating
Antwort
Rot Array (Benutzderdefinierten Datentyp) in Funktion übergeben
 22.02.2012 15:03:38 Sophie
NotSolved
22.02.2012 19:41:32 Till
NotSolved
23.02.2012 08:42:19 Sophie
NotSolved
23.02.2012 10:54:48 Till
NotSolved
23.02.2012 12:37:21 Gast27885
NotSolved
24.02.2012 00:38:06 Till
NotSolved

Ansicht des Beitrags:
Von:
Sophie		 Datum:
22.02.2012 15:03:38		 Views:
2770		 Rating:
     
Antwort:
  Ja
Thema:
Array (Benutzderdefinierten Datentyp) in Funktion übergeben		 
Hallo!

Ich bin zienlich neu mit VBA. Nun wollte ich eigentlich nur eine ganz einfache Funktion zum Aufsummieren und den zugehörigen Aufruf in VBA schreiben.
Dabei trat leider ein Problem mit benutzerdefinierten Datentypen auf.

	Function summe(summand As Variant) As Variant
	Dim lsg(2010 To 2060) As Variant
	Dim i, j As Integer
	Erase lsg
	For j = 2010 To 2060
        	For i = 1 To 30
            	lsg(j) = summand(i, j) + lsg(j)
        	Next i
	Next j
	summe = lsg
	End Function
Die Funktion summe wird dann im sub-Programm folgendermaßen aufgerufen:

	Sub bla()
	Dim a(2010 To 2060) As Double
	Dim Vara As Variant
	Dim Varb As Variant
	
	Public Type blub
	          b As Double
	end type
	Public test(1 To 30, 2010 To 2060) As blub

	Vara = a
	Varb = test.b
	Vara = summe(Varb)
	End Sub


(Ich habe gelesen, die Umdefinierung der Arrays als Variant sei nötig.)
Daraufhin erhalte ich die Meldung 'Fehler beim Kompilieren: Ungültiger Bezeichner' für Varb = test.b.
Für 'normale', d.h. nicht-benutzerdefinierte Variablen hat die Ausführung bereits geklappt...War das nur Zufall bzw gibt es etwas was ich noch beachten muss?

Vielen Dank schonmal für die Hilfe!

Sophie

 

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
Rot Array (Benutzderdefinierten Datentyp) in Funktion übergeben
 22.02.2012 15:03:38 Sophie
NotSolved
22.02.2012 19:41:32 Till
NotSolved
23.02.2012 08:42:19 Sophie
NotSolved
23.02.2012 10:54:48 Till
NotSolved
23.02.2012 12:37:21 Gast27885
NotSolved
24.02.2012 00:38:06 Till
NotSolved