konto usunięte
Temat: Listy rozwijane - wartość domyślna
Witam,Jak zrobić wartość domyślną w liście rozwijanej? np. jak robie makro które kopiuje liste rozwijaną do nowego wiersza to żeby w niej sie pojawiala wartość domyslna?
Pozdrawiam,
konto usunięte
Andy L. ITM, VUB
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim FinalRng As Range, OneCell As Range
Set FinalRng = Intersect(Target, Range("B1:B65535"))
If Not FinalRng Is Nothing Then
For Each OneCell In FinalRng
If Trim(OneCell.Value) = "" Then: OneCell.Value = "Twoja wartosc domyslna"
Next OneCell
End If
End Sub
Oskar
Shon
Dodatki do Office
www.VBATools.pl
konto usunięte
Oskar
Shon
Dodatki do Office
www.VBATools.pl
Andy L. ITM, VUB
Marcin J.:
no właśnie tak nie wychodzi ;/
nagrywam makro w poniższy sposób:
robe tak ze kopiuje caly wiersz, gdzie sa listy rozwjane, wybieram "Wstaw skopiowane komórki", ustawiam wartości domyślne w listach rozwijanych i zatrzymuje makro. Po uruchomieniu makra pojawia sie nowy wiersz z listami rozwijanymi bez wartości...
konto usunięte
Oskar
Shon
Dodatki do Office
www.VBATools.pl
Andy L. ITM, VUB
Oskar
Shon
Dodatki do Office
www.VBATools.pl
Andy L. ITM, VUB
konto usunięte
Andy L. ITM, VUB
Marcin J.:
własnie zastanawialem sie czy mozna w liscie rozwijanej to zdefiniować, jeśli nie to trudno
konto usunięte
Następna dyskusja: