Thema Datum  Von Nutzer Rating
Antwort
Rot erstellen von feldern
22.12.2009 16:37:04 vikar
NotSolved
24.12.2009 10:56:34 Holger
NotSolved

Ansicht des Beitrags:
Von:
vikar
Datum:
22.12.2009 16:37:04
Views:
1638
Rating: Antwort:
  Ja
Thema:
erstellen von feldern
hi leute, ich habe gerade erst angefangen VBA zu programmieren und hab nicht wirklich einen durchblick. ich möchte eine unbekannte anzahl von daten(Zeilen) von einem tabellenblatt auslesen, in felder schreiben und auf einem anderem tabellenblatt wieder eintragen. leider kommt bei mir immer der fehler "sub oder funktion nicht deklariert".

Function Felderzeugen()

Dim Feld As String
Dim n As String
'max. Feldanzahl
Dim LetzteBenutzteZeile As Long
'letzter Wert

LetzteBenutzteZeile = ActiveWorkbook.Worksheets("Tabelle1").UsedRange.Rows.Count + ActiveWorkbook.Worksheets("Tabelle1").UsedRange.Row - 1
'ermitteln der Zeile mit letztem Wert
n = Worksheet("Tabelle2").Cells(2, 8)


Application.Worksheets("Tabelle1").Range("A1:letztebenutztezeile" & EndE) = Feld()
For i = LBound(Feld) To i = LetzteBenutzteZeile
ReDim Preserve Feld(DSatzNr)
'legt Feld an, behält Werte
Line Input, Feld(DSatzNr)
'schreibt Daten in Feld
Next i

End Function

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 erstellen von feldern
22.12.2009 16:37:04 vikar
NotSolved
24.12.2009 10:56:34 Holger
NotSolved