ho una matrice con
prima riga date progressive
prima colonna nomi impianti.
selezionando una cella della matrice ottengo come variabili il nome impianto e la data.
all'apertura di una userform trasferiscoil nome impianto a una textbox e fin qui tutto ok.
Con il nome impianto entro in un altro foglio in cui ho un'altra matrice con
prima riga nomi impianti
sotto il nome impianto una serie di valori da trasferire a una combobox della stessa userform.
Al variare dell'impianto cambiano anche i valori da assegnare alla combobox.
Sapete aiutarmi in questo secondo passaggio?
il codice che sto usando è
- Codice: Seleziona tutto
Private Sub UserForm_Activate()
Dim riga As Integer
Dim colonna As Integer
Dim Forno As String
Dim data_inizio As Date
Dim NumR, NumC, R
'individua il forno in modifica
riga = Selection.Row
'MsgBox riga
colonna = Selection.Column
'MsgBox colonna
Forno = ActiveSheet.Cells(riga, 1).Value
data_inizio = ActiveSheet.Cells(4, colonna).Value
'MsgBox Forno
'MsgBox data_inizio
Foglio15.Select
Cells(1, 1).Select
Do Until Selection.Value = Forno Or Selection.Value = ""
' MsgBox Selection
'MsgBox Forno
ActiveCell.Offset(0, 1).Select
Loop
ActiveCell.Offset(1, 0).Select
Set intervallo = Range(Selection, Selection.End(xlDown))
intervallo.Select
'popolare combobox1
UserForm1.TextBox1.Value = Forno
combox1
End Sub
ciao
