Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Problem dringend
 26.04.2012 16:40:59 VBA - Neuling
NotSolved
30.04.2012 15:53:05 Holger
NotSolved

Ansicht des Beitrags:
Von:
VBA - Neuling		 Datum:
26.04.2012 16:40:59		 Views:
1859		 Rating:
     
Antwort:
  Ja
Thema:
VBA Problem dringend

Hallo zusammen,
ich bin ein VBA Neuling und brauche dringend Hilfe.

Problemstellung:

Ich habe eine UserForm mit 3 Textboxen und einem Button. In der TextBox1 soll man unterschiedliche Werte eingeben können. Die zweite Textbox soll die Anzahl der untereinander eingelesenen Werte begrenzen (zb wert =5 dann soll man die ersten 5 eingegebenen werte in die Zellen A2 - A6 schreiben) danach soll Soll man in die Spalte B springen und dort das gleiche machen und danach in Spalte C usw... Die TextBox 3 soll begrenzen wie oft es nach rechts springen soll also beim wert 4 zb nur bis Saplte D

Ich habe es versucht aber nicht hinbekommen mein Quellcode ist bis jetzt so:

Function lngletztezeile() As Double

Dim i As Integer
Dim lngMin As Integer
Dim lngMax As Integer
'Ermittelt die letzte beschriebene Zeile in der Spalte A

For i = 2 To 2

lngMin = Cells(65538, i).End(xlUp).Row

If lngMax < lngMin Then
lngMax = lngMin
End If

Next i
lngletztezeile = lngMax

End Function


Private Sub CommandButton1_Click()
Dim X As Integer
Dim i As Integer
Dim P As Integer
Dim y As Integer


i = TextBox2.Value

Range("A1").Value = Range("A1").Value + 1
X = Range("A1").Value

If X = i Then
Selection.Offset(0, 1).Select
Range("A1").Value = 0
End If

Cells(lngletztezeile + 1, 2).Value = TextBox1.Value


End Sub



Hoffe mir kann jemand weiterhelfen

danke im voraus

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 VBA Problem dringend
 26.04.2012 16:40:59 VBA - Neuling
NotSolved
30.04.2012 15:53:05 Holger
NotSolved