-
Fototrend
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
-
MCMLXXXII
tag
válasz
temporello
#41023
üzenetére
küldtem emailt
-
MCMLXXXII
tag
válasz
temporello
#41023
üzenetére
köszi
ez így is sok nekem a dátumok általatok írt makróval kerül alá automatán -
MCMLXXXII
tag
válasz
Fferi50
#38679
üzenetére
If Target.Column > 4 And Target.Row Mod 2 = 0 Then
Application.EnableEvents = False
If Target = "" Then
Target.Offset(1) = ""
Else
If IsNumeric(Target) And Target.Count = 1 Then
Target.Offset(1) = Format(Now, "yyyy.mm.dd h:m")
Target.Offset(1).Locked = True
Columns(Target.Column).EntireColumn.AutoFit
End If
End If
Application.EnableEvents = True
End If -
MCMLXXXII
tag
sziasztok
segítettek egy elég komoly VBA ban de észre vettemegy hibát vagy nem tudom mit
tehát a jelenség
ha öbb cellát jelölök ki és tartalom törlést választom akkor össze omlik a VBAlények felső cellába írok darab számot alá automatikusan be kerül a dátum és ha több tételt törlök össze omlik
szerintetek mi lehet a baj? -
MCMLXXXII
tag
sziasztok abban szeretném a segítségeteket kérni hogy csináltam egy anyagleltár táblázatot és szeretném hozzá rendelni az adott időt egy cellához de sehogy nem akar össze jönni amit itt leírtatok tökéletesen működik csak nekem nem jó, nekem vízszintesen kellene
ezt használnám csak vízszintesen és alá kerülne a dátum
http://excel-bazis.hu/forumok/topic/most-fuggveny-hasznalata ból másolva
If Target.Column = 7 Then
Application.EnableEvents = False
If Target <> "" Then
Target.Offset(0, -4) = Format(Date + Time, "yyyy.mm.dd. h:mm")
Else
Target.Offset(0, -4).ClearContents
End If
Application.EnableEvents = True
End If
Új hozzászólás Aktív témák
- PC Game Pass előfizetés
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- MS SQL Server 2016, 2017, 2019
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Hp USB-C/Thunderbolt 3 dokkolók: USB-C Universal, G2, G4, G5, Hp Elite/Zbook- Thunderbolt 4 G4
- Apple MacBook Air 13 (2020) M1 8GB/500GB használt, megkímélt 82% akku
- ÁRGARANCIA!Épített KomPhone i5 10400F 16/32/64GB RAM RTX 3060 12GB GAMER PC termékbeszámítással
- HP Victus 16 i5-11400H 16 GB RAM 512SSD RTX 3050 4 GB FHD 144Hz
- REFURBISHED és ÚJ - HP USB-C/A Universal Dock G2 (5TW13AA) (DisplayLink)
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest