Hirdetés
- Meggyi001: Áram nélkül....méltóság nélkül.....
- Luck Dragon: Asszociációs játék. :)
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- Luck Dragon: Óraátállítás
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- MasterDeeJay: Intel Optane M10: mire lehet használni?
- Navaren: Resident Evil Requiem szösszenet
Új hozzászólás Aktív témák
-
maugly
csendes tag
A segítségetekre lenne szükségem.

PowerPoint makrót szeretnék használni.
A feladatom az lenne, hogy egy diagram elemeit (legalább a szövegrészeket) egyenként nagyítsam és kicsinyítsem, mindig azt, amit a felhasználó aktiválni kíván az egérrel.
Nem vagyok egy nagy VB-guru, ez az első próbálkozásom benne, így főleg a help-file alapján, meg a kis fejlődésben lemaradt ősrégi programozói tapasztalataimmal próbálkoztam.
Az alap, a kicsinyítés-nagyítás megvan, ezt kellene kicsit univerzálisabbá tennem, ami a helyes szintaktika és a pontosabb programnyelv-ismeret nélkül eléggé kifog rajtam.
Addig jutottam, hogy az egyes elemeket tudom azonosítani (mivel a PowerPoint ad nekik egyedi azonosítót), valahogy így:
ActiveWindow.Selection.ShapeRange.GroupItems(Index:=53).TextFrame.TextRange.Characters(Start:=1, Length:=100).Select
With ActiveWindow.Selection.TextRange.Font
Szép hosszú, gyanítom, akad egyszerűbb is.
A kérdésem az, hogy hogyan tudok hivatkozni az aktivált GroupItem Indexére? Van valamilyen ''gyári'' változó, ami ezt tartalmazhatja, vagy valami hasonló?
Új hozzászólás Aktív témák
- 5.1, 7.1 és gamer fejhallgatók
- One otthoni szolgáltatások (TV, internet, telefon)
- Le Mans Ultimate
- Mazda topik
- Folyószámla, bankszámla, bankváltás, külföldi kártyahasználat
- exHWSW - Értünk mindenhez IS
- TCL LCD és LED TV-k
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Kötelező frissítésnek számít a Microsoft legújabb csomagja a Windows 11-hez
- További aktív témák...
- iMac Pro 27" 2017, Xeon W-2191B 18 core, 64 GB RAM, 8 GB GPU, 1 TB SSD - 27% Áfás (0441AB)
- ÚJ/BONTATLAN Microsoft Surface Laptop 7 X Elite 16GB 512GB
- GYÖNYÖRŰ iPhone 13 Pro 128GB Sierra Blue -1 ÉV GARANCIA -Kártyafüggetlen, MS3965
- RGB GAMER PC! i7-13700K / RTX 4080 / Z790 Strix / 32GB 3600MHz / 2TB NVMe / 850w Gold!
- 15" MacBook Air M3 16GB RAM/ 512GB SSD - 27% ÁFA (0424AB)
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

