Ú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
- GAMING PC! Ryzen 7 5800x , Radeon RX6700XT, 32Gb RAM
- ASUS VZ24EHE 1080p / 75Hz / 60cm (23,8") IPS /1ms válaszidő / Gamer funkciók / FreeSync
- MSI MECH 2X RX 6600 XT - eladó!
- Újszerű Topping D10s - USB DAC 32bit 384KHz DSD256
- PCLab Pro P-689 Ryzen 7 9700x / 32GB DDR5 / RTX 5070 - halk, prémium 1440p/4K gamer PC
- Több mint 75.000 eladott szoftverlicenc
- GYÖNYÖRŰ iPhone 12 Mini 64GB Black-1 ÉV GARANCIA - Kártyafüggetlen, MS3456
- Acer Nitro V 15 Laptop i5-13420H 8 GB RAM 512 GB SSD, RTX 4050 Dobozos, 3 ÉV GARANCIA
- HIBÁTLAN iPhone 13 256GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3421
- Azonnali készpénzes félkonfig / félgép felvásárlás személyesen / csomagküldéssel korrekt áron
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: NetGo.hu Kft.
Város: Gödöllő