Hirdetés
- Luck Dragon: MárkaLánc
- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- Sapphi: StremHU | Source – Self-hostolható Stremio addon magyar trackerekhez
- MasterDeeJay: Intel Optane M10: mire lehet használni?
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- gban: Ingyen kellene, de tegnapra
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
-
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
-
apeelme
addikt
válasz
Delila_1
#14674
üzenetére
Felhasználván a leírásod, kreáltam magamnak egy dátumválasztót a munkafüzetemben (office2003).
Minden szuper de a megjelenése valamitől egyszer csak "tönkre ment", fogalmam sincs mit csináltam, de akármit módosítok most már így jelenik meg. Talán jobban végiggondolva onnantól lett rossz hogy a 3. oszlopra is akartam egy ugyanilyet term. módosított kóddal.
Így jelenik meg:
Két naptárnak látszik de ténylegesen csak egy, a belső naptár a kattintható, viszont úgy tűnik hogy a nagyobbhoz illeszkedik a gomb. Ha kattintok egy dátumon akkor a külső eltűnik. És a külső megfelel a megadott méretnek.
Ez mitől lehet?Private Sub Calendar1_Click()
Cells(Selection.Row, 2) = Me.Calendar1.Value
End Sub
Private Sub CommandButton1_Click()
Me.Calendar1.Today
Cells(Selection.Row, 2) = Me.Calendar1.Value
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 Then
Me.Calendar1.Value = Cells(Selection.Row, 2)
Me.Calendar1.Left = ActiveCell.Left + ActiveCell.Width + 2
Me.Calendar1.Top = ActiveCell.Top + ActiveCell.Height
Me.CommandButton1.Left = Me.Calendar1.Left
Me.CommandButton1.Top = Me.Calendar1.Top + Me.Calendar1.Height
Me.Calendar1.Visible = True
Me.CommandButton1.Visible = True
Else
Me.Calendar1.Visible = False
Me.CommandButton1.Visible = False
End If
End Sub
Új hozzászólás Aktív témák
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- The Elder Scrolls Online Imperial Collector s Edition
- Dell Vostro 3425 6magos Ryzen 5 5625U 8GB RAM 256GB SSD
- AKCIÓ! Apple MacBook Pro 14 M4 Max 36GB RAM 1TB SSD macbook garanciával hibátlan működéssel
- Dell Latitude 5430 14" Touchscreen i5-1235U 32GB 1000GB 1 év garancia
- 236 - Lenovo Legion Pro 7 (16IRX9H) - Intel Core i9-14900HX, RTX 4090
- AKCIÓ! Asrock B450M R5 5500 8GB DDR4 256GB SSD GTX 1050 Ti 4GB Zalman T3 Plus DeepCool 400W
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Köszönöm de igy nem tudom használni normálisan.
Remélem érthető. 
Szuper, köszönöm.
Fferi50