Condividi:        

Inserire i dati della UserForm nella prima riga vuota

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Inserire i dati della UserForm nella prima riga vuota

Postdi sinner69 » 18/07/12 11:18

Salve a tutti sto creando una rubrica clienti utilizzando una UserForm per inserire i dati ma non riesco a realizzare quello che voglio qualcuno può aiutarmi ?
Mi spiego :
ad esempio ho una UserForm con tre campi textBox A, B, C vorrei che questi campi verrebbero scritti nella prima riga vuota del foglio esempio a1,b1,c1 e che se i campi o uno dei campi della UserForm viene lasciato vuoto nel goglio non viene scritto nulla e venga segnalato un messaggio di errore

grazie a tutti
A Buon Rendere...
Avatar utente
sinner69
Utente Junior
 
Post: 44
Iscritto il: 03/06/12 20:59
Località: Avola

Sponsor
 

Re: Inserire i dati della UserForm nella prima riga vuota

Postdi patel » 18/07/12 14:08

allega il tuo file, le istruzioni sono qui viewtopic.php?f=26&t=80395
patel
Utente Senior
 
Post: 309
Iscritto il: 24/04/12 16:03

Re: Inserire i dati della UserForm nella prima riga vuota

Postdi sinner69 » 18/07/12 16:03

ciao ma il mio file non ha nessun dato per adesso ma soltanto un pulsante assegnato alla userForm con sette textBox
queste sette textbox una volta compilate dovrebbero inserire i dati nella prima riga vuota a partire dalla colonna A fino alla G una per ogni Campo

cmq ora allego.
A Buon Rendere...
Avatar utente
sinner69
Utente Junior
 
Post: 44
Iscritto il: 03/06/12 20:59
Località: Avola

Re: Inserire i dati della UserForm nella prima riga vuota

Postdi sinner69 » 18/07/12 16:20

sinner69 ha scritto:ciao ma il mio file non ha nessun dato per adesso ma soltanto un pulsante assegnato alla userForm con sette textBox
queste sette textbox una volta compilate dovrebbero inserire i dati nella prima riga vuota a partire dalla colonna A fino alla G una per ogni Campo

cmq ora allego.

https://rapidshare.com/files/3449581269/Lista%20Clienti.xlsm
A Buon Rendere...
Avatar utente
sinner69
Utente Junior
 
Post: 44
Iscritto il: 03/06/12 20:59
Località: Avola

Re: Inserire i dati della UserForm nella prima riga vuota

Postdi patel » 18/07/12 17:01

nella tua userform manca un pulsante per attivare la convalida dei dati e il trasferimento nel foglio, un esempio da adattare e completare è questo
Codice: Seleziona tutto
Private Sub CommandButton1_Click()
If TextBox1.Text = "" Then
MsgBox "Campo Cognome obbligatorio !!!", vbOKOnly, "Richiesta"
TextBox1.SetFocus
Exit Sub
End If
If TextBox2.Text = "" Then
MsgBox "Campo Nome obbligatorio !!!", vbOKOnly, "Richiesta"
TextBox2.SetFocus
Exit Sub
End If
' --------------- continua
Sheets("Foglio1").Visible = True
Sheets("Foglio1").Activate
Dim iRow As Integer
iRow = 3
While Cells(iRow, 1).Value <> ""
iRow = iRow + 1
Wend
Cells(iRow, 2) = TextBox1
Cells(iRow, 3) = TextBox2
Cells(iRow, 4) = TextBox3
' -------------- continua
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
TextBox4 = ""
TextBox5 = ""
End Sub
patel
Utente Senior
 
Post: 309
Iscritto il: 24/04/12 16:03

Re: Inserire i dati della UserForm nella prima riga vuota

Postdi sinner69 » 19/07/12 02:20

grazie funziona perfettamente
A Buon Rendere...
Avatar utente
sinner69
Utente Junior
 
Post: 44
Iscritto il: 03/06/12 20:59
Località: Avola


Torna a Applicazioni Office Windows


Topic correlati a "Inserire i dati della UserForm nella prima riga vuota":


Chi c’è in linea

Visitano il forum: Nessuno e 28 ospiti

cron