Hirdetés
- Fotók, videók mobillal
- Samsung Galaxy Z Fold7 - ezt vártuk, de…
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- CMF Phone 1 - egy jó telefon
- Félmillió felett a kiszállított Xiaomi autók száma
- Xiaomi 14 - párátlanul jó lehetne
- Xiaomi 15T Pro - a téma nincs lezárva
- QWERTY billentyűzetes, üzenet-fókuszú androidos mobil a Clicks Communicator
- Rugalmas OLED panelre válthat a Samsung Galaxy A57
- Google Pixel 8 Pro - mestersége(s) az intelligencia
-
Mobilarena
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
- Projektor topic
- Spórolós topik
- A legrosszabb CPU-k – az ExtremeTech szerint
- Autós topik
- Székesfehérvár és környéke adok-veszek-beszélgetek
- Gyúrósok ide!
- Lexus, Toyota topik
- Vicces képek
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- További aktív témák...
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Vírusirtó licencek- Azonnal - Számlával - Garanciával
- MS SQL Server 2016, 2017, 2019
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok : (12.20.)
- CSX 2x2GB (4GB) DDR2 800 MHz kit
- iPhone 17 Pro Max Kozmosznarancs - Bontatlan !! www.stylebolt.hu - Apple eszközök és tartozékok !!
- BESZÁMÍTÁS! ASROCK H510M i5 11400F 16GB DDR4 512GB SSD RTX 3060 12GB Rampage SHIVA ADATA 650W
- GYÖNYÖRŰ iPhone 13 Mini 128GB Blue- 1 ÉV GARANCIA -Kártyafüggetlen, MS4067,94% Akksi
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 32/64GB RAM RX 9070 XT 16GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopszaki Kft.
Város: Budapest