Hirdetés
-
Ellopták a Tesla akkumulátor-titkait
it Beperelte egy korábbi beszállítóját a Tesla, és azzal vádolja, hogy üzleti titkokat lopott a Tesla akkumulátorgyártási technológiájával kapcsolatban.
-
Megjöttek az MSI DDR5-ös AMD alaplapjaihoz az új BIOS-ok
ph A legfrissebb firmwareverziók több gondra is gyógyírt jelentenek, de a fókuszban az NVIDIA GeFore RTX 40xx kártyák kezelésének helypofozása van.
-
Dobja a változatható apertúrát a Xiaomi 15 Pro?
ma Lencsetrükkök helyett nagyobb szenzorral érkezhet októberben.
-
PROHARDVER!
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
-
Excelbarat
tag
valószínű azért nem fut le rendesen a makród mert "type mismatch"
ezzel a módszerrel viszon megkerülheted ezt és az eredmény ugyan az
ezt írd be a makródba:Cells.Replace What:="#hiányzik", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Cells.Replace What:="1900.01.00", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False(makrórögzítéssel készült
, csodákra képes)
[ Szerkesztve ]
-
Mutt
aktív tag
Hali,
A hiányzik (és további hibaüzeneteket) ezzel tudod eltávolítani:
Selection.SpecialCells(xlCellTypeFormulas, 16).Select
Selection.ClearContentsAz 1900.01.00 pedig valójában 0-t tartalmazó dátumformátumú cella, ezt használhatod.
'kiválasztjuk a számokat tartalmazó cellákat
Selection.SpecialCells(xlCellTypeConstants, 1).Select
'végigmegyünk rajtuk
For Each cella In Selection
If cella.Value = 0 Then cella.Clear
Next cellaüdv.
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
Új hozzászólás Aktív témák
- Bitdefender Total Security 3év/3eszköz! - "Tökéletes védelem most kedvező áron..."
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!