• Najnowsze pytania
  • Bez odpowiedzi
  • Zadaj pytanie
  • Kategorie
  • Tagi
  • Zdobyte punkty
  • Ekipa ninja
  • IRC
  • FAQ
  • Regulamin
  • Książki warte uwagi

Podpowiedzi z tabli w excel

Object Storage Arubacloud
0 głosów
89 wizyt
pytanie zadane 28 września 2023 w Systemy operacyjne, programy przez Latarnik Użytkownik (650 p.)
edycja 28 września 2023 przez Latarnik

Dzień dobry,

chciałbym  poprosić o pomoc, chciałbym aby nie trzeba było za każdym razem klikać na rozwinięcie listy w arkuszu. Tylko aby wszystkie opcje od razu się pokazywały po kliknięciu w komórkę.

Czy ktoś mógłby wyjaśnić mi krok po kroku jak do tego dojść ??

Dokładniej chodzi o to aby zamiast tego przycisku do rozsuwania listy wyboru, miał od razu listę po kliknięciu w komórkę.

 

1 odpowiedź

0 głosów
odpowiedź 29 września 2023 przez VBService Ekspert (254,490 p.)
edycja 29 września 2023 przez VBService

Próbowałeś tak, przez podwójne kliknięcie w komórkę, zapisz kod vba w Arkuszu

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim validationList As String
    Dim cell As Range

    On Error Resume Next
    validationList = Target.Validation.Formula1
    
    ' Jeśli komórka ma opcje wyboru, wyświetl listę po podwójnym kliknięciu
    If Not validationList = vbNullString Then
        If cell Is Nothing Then
            Set cell = Target
        End If
        cell.Select
        SendKeys "%{DOWN}"
        Cancel = True
    End If
End Sub

 

Podobne pytania

+1 głos
0 odpowiedzi 190 wizyt
pytanie zadane 5 listopada 2020 w Systemy operacyjne, programy przez Falwack Początkujący (400 p.)
0 głosów
1 odpowiedź 115 wizyt
0 głosów
0 odpowiedzi 153 wizyt
pytanie zadane 12 stycznia 2023 w Systemy operacyjne, programy przez Muminek Dyskutant (8,650 p.)

92,675 zapytań

141,579 odpowiedzi

320,058 komentarzy

62,039 pasjonatów

Motyw:

Akcja Pajacyk

Pajacyk od wielu lat dożywia dzieci. Pomóż klikając w zielony brzuszek na stronie. Dziękujemy! ♡

Oto polecana książka warta uwagi.
Pełną listę książek znajdziesz tutaj.

Akademia Sekuraka

Niedawno wystartował dodruk tej świetnej, rozchwytywanej książki (około 940 stron). Mamy dla Was kod: pasja (wpiszcie go w koszyku), dzięki któremu otrzymujemy 10% zniżki - dziękujemy zaprzyjaźnionej ekipie Sekuraka za taki bonus dla Pasjonatów! Książka to pierwszy tom z serii o ITsec, który łagodnie wprowadzi w świat bezpieczeństwa IT każdą osobę - warto, polecamy!

...