Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Problema: Nitidezza e ridimensionamento immagini in Word 2002 Sp3

255 views
Skip to first unread message

Davide

unread,
Feb 16, 2008, 7:04:01 AM2/16/08
to
Gentili lettori desidero sottoporvi il seguente problema.
Ogni volta che eseguo il seleziona tutto da pagine web ed il copia/incolla
su una pagina di Word, le immagine presentano dimensioni maggiori di quelle
mostrate sulla pagina web ed inoltre appaiono sfocate.
Ho notato che selezionando l’immagine incollata in Word ed impostando le
proporzioni d’altezza e larghezza entrambe al 79% dalla finestra “Dimensione”
delle opzioni “Formato immagine”, l’immagine incollata appare nitida e viene
ridimensionata alle dimensioni con cui appare sulla pagina web.

Come posso agire affinché le immagini incollate in Word appaiano
immediatamente nitide senza agire ogni volta su ciascuna di esse manualmente?

Oppure, come posso agire affinché le immagini incollate siano
automaticamente regolate alle proporzioni da me volute?

Ho provato a disattivare la funzione ClearType dalla scheda Aspetto delle
proprietà dello schermo, senza ottenere alcun risultato, inoltre ho
registrato una Macro delle regolazioni che effettuo per ridimensionare le
proporzioni dell’immagine ma non mi funziona.

Lavoro con Word 2002 SP3 e monitor LCD Acer AL1951 da 19” impostato con
risoluzione 1280x1024 pixel e colore a 32 bit.

In attesa di una risposta, Saluto i lettori.


Sergio MAZZA

unread,
Feb 27, 2008, 2:42:30 AM2/27/08
to
"Davide" <Dav...@discussions.microsoft.com> ha scritto nel messaggio
news:2C42F72C-37F9-4178...@microsoft.com...


Non conosco operazioni manuali che agiscono sul copia/incolla; posso
suggerirti del codice da associare ad una macro per ripristinare la
dimensione (al 100%) e i valori di contrasto/luminosità (50%):
es.
'-------
Dim xImm as Long
ActiveDocument.Select
For xImm = 1 to ActiveDocument.InlineShapes(xImm).Count
With Selection.InlineShapes(xImm)
.ScaleHeight = 100
.ScaleWidth = 100
.PictureFormat.Brightness = 0.5
.PictureFormat.Contrast = 0.5
end with
next
'-------

Ciao.
--
Sergio MAZZA


0 new messages