Hirdetés
- Brogyi: CTEK akkumulátor töltő és másolatai
- gban: Ingyen kellene, de tegnapra
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- eBay-es kütyük kis pénzért
- droidic: Videó letöltés yt-dlp-vel (profi módszer)!
- vrob: Próbálkozás 386 alaplap újraélesztésre
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- sziku69: Szólánc.
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
-
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
-
Fferi50
Topikgazda
válasz
dm1970
#38896
üzenetére
Szia!
Sajnos nem látok igazán direkt képletes megoldást.
Viszont a keres-cserél képletekben szerintem elég gyorsan működik, nem kell kézzel átírni az egészet.
Vagy ugyanaz makróval:Range("D1").Formula = Left([a1].Formula, InStr([a1].Formula, "[")) & [i1].Value & Mid([a1].Formula, InStr([a1].Formula, "]"))
Ez a sor a D1 cellába beírja az A1 cellában levő képletet, módosítva az I1 cellában levő fájlnévre.A makrót beírhatod pl. a munkalap Change eseménykezelőjébe.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 And Target.Column = 1 Then 'ha az a1 cella v?ltozott
Range("D1").Formula = Left([a1].Formula, InStr([a1].Formula, "[")) & [i1].Value & Mid([a1].Formula, InStr([a1].Formula, "]"))
End If
End SubValahányszor az A1 cella értékét módosítod, a D1 cella képlete módosulni fog.
Ez persze csak elindító gondolatnak jó, a pontos paramétereket neked kell kiókumulálni.
Természetesen ha a fájlnevekben van szabályosság, azt lehet a makróban is kezelni.Üdv.
Új hozzászólás Aktív témák
- Mibe tegyem a megtakarításaimat?
- VGA kibeszélő offtopik
- S.T.A.L.K.E.R. 2: Heart of Chornobyl
- Kormányok / autós szimulátorok topikja
- Az Amiga 1200-at is megcsapta a feltámadás szele
- exHWSW - Értünk mindenhez IS
- Xbox tulajok OFF topicja
- Brogyi: CTEK akkumulátor töltő és másolatai
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- További aktív témák...
- OnePlus 12 5G 256GB, Kártyafüggetlen, 1 Év Garanciával
- Kuriózum: Ozark Trail (amerikai) fejlámpa 600 lumen
- ÁRGARANCIA!Épített KomPhone i5 14600KF 32/64GB RAM RX 7800 XT 16GB GAMER PC termékbeszámítással
- Xiaomi Redmi Note 11 Pro 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Telefon felvásárlás!! iPhone 12 Mini/iPhone 12/iPhone 12 Pro/iPhone 12 Pro Max
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50
