Problema dropdown list
-
- Mesaje: 15
- Membru din: Mie Feb 02, 2011 9:59 am
Problema dropdown list
Salutare.
In fisierul atasat am incercat sa fac cat mai simplu un model de factura si chitanta pt. imprimare, dar care sa tina oarecum si evidenta acestora.
Va fi folosit deocamdata doar pt. facturi de servicii emise lunar cam pt. aceiasi clienti.
Problema pe care am intampinat-o este de a crea in tab-ul CHITANTE un dropdown list conditional astfel incat la coloana C/V FACT. sa-mi apara doar facturile emise catre acel client. Bine-nteles ca nu am reusit acest lucru si de aceea va solicit ajutorul.
Si inca o chestie legata de aceste dropdown-uri ... se poate sa elimin cumva liniile goale astfel incat la PRINT-FACTURA sau PRINT-CHITANTA, cand selectez factura, respectiv chitanta, sa nu imi arate liniile goale?
Multumesc.
In fisierul atasat am incercat sa fac cat mai simplu un model de factura si chitanta pt. imprimare, dar care sa tina oarecum si evidenta acestora.
Va fi folosit deocamdata doar pt. facturi de servicii emise lunar cam pt. aceiasi clienti.
Problema pe care am intampinat-o este de a crea in tab-ul CHITANTE un dropdown list conditional astfel incat la coloana C/V FACT. sa-mi apara doar facturile emise catre acel client. Bine-nteles ca nu am reusit acest lucru si de aceea va solicit ajutorul.
Si inca o chestie legata de aceste dropdown-uri ... se poate sa elimin cumva liniile goale astfel incat la PRINT-FACTURA sau PRINT-CHITANTA, cand selectez factura, respectiv chitanta, sa nu imi arate liniile goale?
Multumesc.
Nu aveţi permisiunea de a vizualiza fişierele ataşate acestui mesaj.
Re: Problema dropdown list
Buna ziua
Pentru prima problema nu va pot propune decat o varianta folosind macro. Codul de mai jos parcurge toata lista din foaia Chitante, sterge regula de validare de pe coloana cu numar factura si recreaza lista, particularizata pentru fiecare nume de firma in parte.
Am folosit codul:
Pentru testare: deschideti fisierul atasat si rulati macro de la butonul albastru din foaia Chitante
Pentru a doua problema: tot in fisierul atasat am modificat in Name Manager pentru ca Range-urile de interes sa fie dinamice.
IP
Pentru prima problema nu va pot propune decat o varianta folosind macro. Codul de mai jos parcurge toata lista din foaia Chitante, sterge regula de validare de pe coloana cu numar factura si recreaza lista, particularizata pentru fiecare nume de firma in parte.
Am folosit codul:
Cod: Selectaţi tot
Sub GenCustomDV()
'IPP - 01.03.2020
Dim rngS As Range
Set rngS = [NUMAR_F].Offset(0, 2)
Dim myList As String
myList = ""
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Sheets("CHITANTE").Select
Range("D2").Select
Do Until IsEmpty(Cells(ActiveCell.Row, 3))
For Each c In rngS
If c = ActiveCell Then
myList = myList & c.Offset(0, -2) & ","
End If
Next c
myList = Left(myList, Len(myList) - 1)
With Selection.Offset(0, 1).Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:=myList
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
ActiveCell.Offset(1, 0).Select
myList = ""
Loop
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub
Pentru a doua problema: tot in fisierul atasat am modificat in Name Manager pentru ca Range-urile de interes sa fie dinamice.
IP
Nu aveţi permisiunea de a vizualiza fişierele ataşate acestui mesaj.
-
- Mesaje: 15
- Membru din: Mie Feb 02, 2011 9:59 am
Re: Problema dropdown list
E ok. Speram ca se poate face si fara macro, dar e bine si asa.
Multumesc inca o data!
Multumesc inca o data!