vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest sobota, 26 kwietnia 2025 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

dane z userform do excela


otwartyotwarty rozpoczął: sewer_zdw postów: 8



napisał: Rycho
postów: 291


umieszczony:
25 sierpnia 2007
18:44

  
Hej.
(.Cells(Cells.Rows.Count, "B").End(xlUp).Row
Jest to jeden ze sposobów znalezienia wiersza poprzedniego zapisu danych.

Cells.Rows.Count
zwraca maksymalną liczbę wierszy w arkuszu. Do excela 2003 było to zawsze 65536, ale w excelu 2007 tych wierszy jest więcej. Używanie tej własności zamiast stałej jest bardziej uniwersalne.

.Cells(Cells.Rows.Count, "B") to komórka w ostatnim wierszu kolumny B

metoda End(xlUp)jest odpowiednikiem naciśnięcia klawiszy Ctrl i strzałka w górę

Użyłem funkcji max arkusza (VBA takiej funkcji niema) bo przyjąłem, że wpisy mogą być także tylko w jednaj z kolumn.

Rycho
napisał: sewer_zdw
postów: 28


umieszczony:
25 sierpnia 2007
10:50

  
dziekuje właśnie o to chodziło...

Możecie mi tylko wytłumaczyc ta linię

"w = WorksheetFunction.Max(.Cells(Cells.Rows.Count, "B").End(xlUp).Row, _
.Cells(Cells.Rows.Count, "C").End(xlUp).Row) + 1"

Co daje Cels.Rows.Count B do Cells.Rows.Count. C??
napisał: Rycho
postów: 291


umieszczony:
23 sierpnia 2007
16:36

edytowany:
23 sierpnia 2007
16:36

  
Hej.
Private Sub CommandButton1_Click()
  Dim w As Long

  With Worksheets("Baza")
    w = WorksheetFunction.Max(.Cells(Cells.Rows.Count, "B").End(xlUp).Row, _
                               .Cells(Cells.Rows.Count, "C").End(xlUp).Row) + 1

    .Cells(w, "B") = Me.TextBox1
    .Cells(w, "C") = Me.TextBox2
  End With

End Sub

napisał: sewer_zdw
postów: 28


umieszczony:
23 sierpnia 2007
11:31

  
Panowie i Panie bardzo was prosze o pomoc.

chodzi o komende która będzie dodawała dane podane w userform w textbox1 oraz textbox2 i dane te wstawiała do arkusza "Baza" odpowiednio do kolumny 2 i 3 w pierwszy wolny wiersz. po nacisnieciu buttona "zapisz".
napisał: sewer_zdw
postów: 28


umieszczony:
21 sierpnia 2007
08:16

  
do arkusza.

z userforma z textbox1 do komórki Arkusz1!$b2 z textbox2 do komórki Arkusz1$c2
kolejny wpis powinien dodawać sie w kolejne wolne miejsce czyli b3 i c3 itd.
napisał: tashemik
postów: 35


umieszczony:
18 sierpnia 2007
17:20

  
Do arkusza czy zakładki?
napisał: sewer_zdw
postów: 28


umieszczony:
18 sierpnia 2007
12:23

  
pytanie dla wiekszosci z was pewnie retoryczne.

jak z userforma dane przenies do kolejnego akrusza.
w userformie podajemy nazwe adres i poprzez przycisk zapisz dane te powinny zapisac sie do bazy.


<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z