Hirdetés
- Magga: PLEX: multimédia az egész lakásban
- leslieke: leslieke farmerzsebe
- laca223: Miért győz a kollektív meggyőződés akkor is, ha saját magát teszi tönkre?
- GoodSpeed: Munkaügyi helyzet Hajdú-Biharban: észak és dél
- laca223: A civilizáció mint bugos operációs rendszer
- Gurulunk, WAZE?!
- Toomy: FOXPOST régen jó volt, de ma már jobban jársz ha elfelejted.
- Luck Dragon: Asszociációs játék. :)
- sziku69: Szólánc.
- sh4d0w: Árnyékos sarok
-
LOGOUT
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
BenJoe80
senior tag
válasz
Delila_1
#24842
üzenetére
Még egy utolsó kérdés: hogy lehet a legördülő lista szélességét beállítani? Megfigyeltem, hogy az általad módosított táblázat legördülő listájában szépen olvasható a kód és név (legnagyobb része) egymás mellett. Amit én csináltam, ott meg a kód is csak ímmel-ámmal fér be legördülő lista szélességébe.
Pontosítok. A táblázatodban a legördülő lista szélesebb mint maga az oszlop, míg az enyémben csak olyan széles, mint maga az oszlop.
-
BenJoe80
senior tag
válasz
Delila_1
#24842
üzenetére

Nagyon szépen köszönöm!!! Közben kértem segítséget máshonnan is és ha nem baj összehasonlítanám a tieddel. A te makród:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Then
Application.EnableEvents = False
Range(Target.Address) = Left(Target, 4)
Application.EnableEvents = True
End If
End SubA másik amit kaptam:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D:D")) Is Nothing And Target.Value <> "" Then
ActiveCell.Value = Left(Target.Value, 4)
End If
End SubBár mindkét makró pontosan azt teszi amire szükségem van, csupán kíváncsiságból: mi a különbség?
Új hozzászólás Aktív témák
- Huawei Watch GT 6 és GT 6 Pro duplateszt
- Magga: PLEX: multimédia az egész lakásban
- OFF TOPIC 44 - Te mondd, hogy offtopic, a te hangod mélyebb!
- Milyen Android TV boxot vegyek?
- The Crew sorozat
- LEGO klub
- Milyen egeret válasszak?
- Spórolós topik
- Lakáshitel, lakásvásárlás
- Arc Raiders
- További aktív témák...
- MS SQL Server 2016, 2017, 2019
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most Ünnepi áron! :)
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- BESZÁMÍTÁS! Gigabyte B550M R7 3700X 32GB DDR4 512GB SSD RTX 3060Ti 8GB Zalman Z1 PLUS CM 700W
- REFURBISHED - DELL Thunderbolt Dock WD19TBS (210-AZBV)
- Új Dell 13 XPS 9350 WUXGA IPS Nano Ultra5 226V 8mag 16GB 512GB SSD Intel ARC 130V 8GB Win11 Garancia
- Egyedi névre szóló karácsonyfadísz rendelhető! 3D Nyomtatott!
- Lian Li SP850 SFX tápegység /850W Gold/Full moduláris/Fekete/Fehér/Újszerű/Garancia/Számla/
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50
