Ho creato un file excel con il quale intendo
gestire la prima nota della mia azienda.
La colonna "F, la colonna "H" e la colonna "J" sono degli elenchi a discesa
con i valori posizionati su un altro foglio di lavoro.
cosa vorrei realizzare??
Bene, le celle delle colonne "I" e "J" devono essere bloccate e quando "H3"
assume valore "BANCA" "I3" si rende editabile con i valori "BONIFICO" o
"ASSEGNO" o "PRELIEVO" e se il valore assunto è ""ASSEGNO" "J3" di rende
editabile con note generiche.
Se "H3" assume valore "ALTRO" "I3" e "J3" rimangono non editabili.
Spero di essemi spiegato.
Ciao e grazie per quello che potrete fare.
Se il resto del foglio non deve avere celle bloccate(non ho capito questa cosa), possiamo impedire la selezione delle celle in colonna I e J se le condizioni non sono quelle volute. Prova a copia/incollare questo nel modulo di codice del foglio dove hai
questa cosa:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
If .Row < 3 Then Exit Sub
If .Column = 9 Then
If UCase(.Offset(0, -1).Value) = "BANCA" Then
With .Validation
.Delete
.Add Type:=xlValidateList, _
AlertStyle:=xlValidAlertStop, _
Operator:=xlBetween, _
Formula1:="BONIFICO,ASSEGNO,PRELIEVO"
.IgnoreBlank = True
.InCellDropdown = True
.ShowInput = True
.ShowError = True
End With
Else
With .Validation
.Delete
End With
.Value = ""
.Offset(0, -1).Select
End If
ElseIf .Column = 10 Then
If .Offset(0, -1).Value <> "ASSEGNO" Then
.Offset(0, -1).Select
End If
End If
End With
End Sub
In pratica se in H (da H3 in poi) hai Banca, automaticamente ti viengono messe le tre scelte BONIFICO, ASSEGNO e PRELIEVO in cella I. Altrimenti non puoi selezionarla. Quando poi selezioni J, se in I non c'è Assegno, ti viene vietata la selezione. Per favore,
comincia a provare. Poi posta sempre in questo thread eventuali problemi/modifiche. Scusa ma non è molto chiaro cosa tu voglia fare. Grazie.
--
La soluzione, il codice ed i files sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dalla soluzione proposta se usata impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare
la soluzione in files importanti.
--
Mauro Gamberini - Microsoft© MVP(Excel)
http://www.maurogsc.eu/