Excel Forum - Porady, Pomoc,  Excel Help, Excel FAQ Strona Główna
 FAQ  RegulaminRegulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj 


Poprzedni temat «» Następny temat
ID tematu: 70575 Skopiuj do schowka Prośba o pomoc, jak poszerzyć listę poprawności danych
Autor Wiadomość
AnnKa
Świeżak


Wersja: Win Office 2019
Posty: 3
  Wysłany: 03-04-2021, 23:00   Prośba o pomoc, jak poszerzyć listę poprawności danych

Witam
Czy istnieje sposób, by uwidocznić cały tekst listy wyboru nie zmieniając szerokości kolumny?
Problem polega na tym, że nazwy tak samo zaczynających się wyrazów nie są widoczne, co powoduje problem z wyborem odpowiedniej pozycji.
Będę wdzięczna za pomoc.
W załączniku plik poglądowy.

Będę wdzięczna za pomoc
pozdrawiam

zrzut ekranu szerokość rozwijanej listy.jpg
Plik ściągnięto 15 raz(y) 112.55 KB

szerokość listy rozwijanej przykładowa tabela.xlsm
Pobierz Plik ściągnięto 8 raz(y) 15.37 KB

_________________
AnnKa
ID posta: 403154 Skopiuj do schowka
 
 
Waldek 
Excel Expert


Wersja: Win Office 2019
Pomógł: 305 razy
Posty: 1350
Wysłany: 04-04-2021, 00:14   

Moim zdaniem bez poszerzenia kolumny lub scalenia komórek się nie da.
ID posta: 403155 Skopiuj do schowka
 
 
Maciej Gonet 
Excel Expert


Wersja: Win Office 2016
Pomógł: 2118 razy
Posty: 6628

Wysłany: 04-04-2021, 00:38   

Standardowo się nie da, ale można spróbować makrem zdarzeniowym. Lista rozwijana jest generowana każdorazowo po wybraniu komórki i kliknięciu na trójkąt. Jest to dynamiczny kształt, którego niektóre parametry można modyfikować.
Tylko ta lista jest niedogodnie położona, bo jest za mało miejsca na wyświetlenie poszerzonej listy. Żeby się zmieściła, musiałem poszerzyć kolumnę A.
Listy nie można przesunąć w prawo, bo trójkąt wyświetlałby się wtedy "w powietrzu". Trójkąt jest wyrównany z prawą krawędzią listy.
Żeby określić prawidłowo szerokość listy trzeba listę wzorcową z nazwami krajów (w kolumnie G) poddać autodopasowaniu szerokości (przy wielkości czcionki Arial 8-9 punktów). Procedura odczytuje tę szerokość. Tu można trochę poeksperymentować, bo moim zdaniem 8 to trochę za mało, a 9 trochę za dużo, to może zresztą zależeć od monitora. Wpisywanie ułamkowych wielkości czcionki chyba jest ignorowane, więc można jedynie nieco skorygować szerokość kolumny.
Treść procedury (zdarzeniowa umieszczona w module arkusza):
Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   Dim Shp As Shape
   On Error Resume Next
   If Intersect(Target(1), Columns("B")) Is Nothing Then Exit Sub
   If Target(1).Validation.Type = xlValidateList Then
      Set Shp = Me.Shapes(Me.Shapes.Count)
      Shp.Width = Evaluate(Target(1).Validation.Formula1).Width
      Shp.Left = Target.Left - Shp.Width + Target.Width
      Set Shp = Nothing
   End If
End Sub


Zauważyłem, że to nie zawsze działa, nie wiem jeszcze dlaczego, ale w razie czego nie trzeba się zrażać tylko próbować kilka razy zmieniając komórki.
Istnieje też prostszy sposób, bez makra, ale też bez możliwości modyfikacji szerokości listy. Jeśli zmienimy Zoom choćby symbolicznie do 101 albo 99%, to lista poszerzy się nieco w lewo, ale to będzie za mało, żeby wszystkie nazwy zmieściły się w całości.

szerokość listy rozwijanej przykładowa tabela.xlsm
Pobierz Plik ściągnięto 8 raz(y) 16.08 KB

  
ID posta: 403156 Skopiuj do schowka
 
 
umiejead 
Excel Expert


Wersja: Win Office 2013
Pomógł: 797 razy
Posty: 4311
Wysłany: 04-04-2021, 01:35   

Może w tą stronę (załącznik - baaardzo draft).

W domyśle (założenie - rozwinięcie): klikniesz w jakąś komórkę w kol. B > wyskoczy Lista rozwijalna (dynamiczna - tylko wypełnione komórki)b >>> coś takiego?
.

tabela.xlsm
Pobierz Plik ściągnięto 12 raz(y) 25.29 KB

_________________
.
Jak poprawnie opisać problem: http://www.excelforum.pl/...ika-vt59262.htm
Chcesz precyzyjną odpowiedź - zadaj precyzyjne pytanie.
  
ID posta: 403157 Skopiuj do schowka
 
 
AnnKa
Świeżak


Wersja: Win Office 2019
Posty: 3
Wysłany: 04-04-2021, 20:10   

Cytat:


DZIĘUJĘ ZA POMOC :)
Wszystko działa jak trzeba :)
:-D
_________________
AnnKa
ID posta: 403175 Skopiuj do schowka
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Theme xandgreen created by spleen& Programosy modified v0.3 by warna
Opieka techniczna www.marketingNET.pl

Archiwum

Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
Sprawdź, w jaki sposób przetwarzamy dane osobowe