Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Inserimento intervalli x textbox

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

Inserimento intervalli x textbox

Postdi cd7019 » 06/04/14 12:50

Ciao,
desidero inserire diversi intervalli selezionati in diverse textbox, però non riesco a impostare la selezione attiva della textbox.
Mi spiego meglio.
Ho 2 textbox
quando la userform è visibile e sono sulla textbox1 inserisci l'intervallo selezionato nella textbox1. (TB1)
quando la userform è visibile e sono sulla textbox2 inserisci l'intervallo selezionato nella textbox2. (TB2)
Ho provato con userform1.TB1.enable e con altri comandi però non funziona.

Codice: Seleziona tutto
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If userform1.Visible And ***userform1.TB1.ATTIVA*** Then userform1.TB1.Value = Selection.Address
If userform1.Visible And ***userform1.TB2.ATTIVA*** Then userform1.TB2.Value = Selection.Address
End Sub

e quando apro la userform, se la selezione è su più righe (n° righe >1) inserisci l'intervallo nella textbox1:
Codice: Seleziona tutto
Private Sub UserForm1_Initialize()
If Selection.Row.Count > 1 Then TB1.Value = Selection.Address
End Sub

però non mi funziona.

Grazie
EXCEL 2003
cd7019
Utente Senior
 
Post: 232
Iscritto il: 26/06/12 21:38

Sponsor
 

Re: Inserimento intervalli x textbox

Postdi Zer0Kelvin » 06/04/14 13:50

Ciao.
Per quanto riguarda la (2) probailmente dovresti inserire l'istruzione nell'evento Activate, non in Initialize.
Per la (1), sarebbe meglio (a mio parere), dopo aver coontrollato che la userform sia visibile, passare il controllo ad una procedura public nella userform stessa.
Vedi esempio
getselection..xls
[Win7,Office2010]
Condividere la conoscenza aumenta la ricchezza di tutti(Z0°K)
Dai ad un uomo un pesce e lo avrai sfamato per un giorno;insegnagli a pescare e lo avrai sfamato per sempre(Confucio)
Il sonno della ragione genera mostri(Francisco Goya)
Avatar utente
Zer0Kelvin
Utente Senior
 
Post: 305
Iscritto il: 08/04/12 11:23

Re: Inserimento intervalli x textbox

Postdi cd7019 » 06/04/14 20:22

Grazie mille.
EXCEL 2003
cd7019
Utente Senior
 
Post: 232
Iscritto il: 26/06/12 21:38


Torna a Applicazioni Office Windows


Topic correlati a "Inserimento intervalli x textbox":


Chi c’è in linea

Visitano il forum: Nessuno e 8 ospiti