Hirdetés
- Ne várj sokat a vásárlással: drágulás a láthatáron
- LG LCD és LED TV-k
- A napi Windows-hiba? Teljes adatvesztés Bitlockerrel
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Intel Core i3 / i5 / i7 / i9 10xxx "Comet Lake" és i3 / i5 / i7 / i9 11xxx "Rocket Lake" (LGA1200)
- Milyen billentyűzetet vegyek?
- Azonnali informatikai kérdések órája
- Apple asztali gépek
- SSD kibeszélő
- Amazon Fire TV stick/box
-
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
-
m.zmrzlina
senior tag
válasz
Digital
#29594
üzenetére
Nem látom ugyan a sor és oszlopazonosítókat de tételezzük fel hogy B1-C1-D1 cellákban van a dátum. Ez a kód a munkafüzet összes munkalapjának B1:D1 artományába bemásolja az aktív munkalapodnak a B1:D1 tartományát.
Sub copy()
For Each ws In ThisWorkbook.Worksheets
Range("B1:D1").copy Destination:=ws.Range("B1")
Next
End Sub -
DeFranco
nagyúr
válasz
Digital
#29594
üzenetére
meg lehet oldani gondolom egy egyszerű makróval, ezt majd a többiek leírják
én (ha ez egyébként egy sablontábla amit periódusonként töltögetsz) annyit csinálnék, hogy szépen képlettel hivatkoznék az első dátumos munkalap dátumot tartalmazó celláira =[munkalap]![cella] formátumban. így automatikusan átveszi csak egyszer kell beírni és napszemüveg.
nem tudom jól értem-e a problémát
Új hozzászólás Aktív témák
- Luck Dragon: Asszociációs játék. :)
- Ne várj sokat a vásárlással: drágulás a láthatáron
- LG LCD és LED TV-k
- A napi Windows-hiba? Teljes adatvesztés Bitlockerrel
- Motorola Edge 70 - többért kevesebbet
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Olyan lesz a Google Térkép, mint a segítőkész haver az anyósülésen
- Elemlámpa, zseblámpa
- Lexus, Toyota topik
- Robotporszívók
- További aktív témák...
- Telefon felvásárlás!! iPhone 14/iPhone 14 Plus/iPhone 14 Pro/iPhone 14 Pro Max
- Thinkpad L13 Yoga i5-10210U 16GB 512GB 13.3", Touch gyári magyar világítós bill 360 Gar.: 1év
- Gamer PC /Ryzen 7 9800X3D, RTX 4070Ti Super, 32GB RAM, 1TB SSD/ akciós áron eladó! BeszámítOK!
- HIBÁTLAN iPhone 11 Pro 64GB Midnight Green -1 ÉV GARANCIA -Kártyafüggetlen, MS3372
- Beszámítás! Samsung Odyssey G5 32 QHD 144Hz VA 1ms monitor monitor garanciával hibátlan működéssel
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50

