Grassetto nella macro
Andrea22
dell'espressione
.Range("B" & lng)
contenuta all'interno di questa?
s = "FT N°" & .Range("B" & lng) & "/" & Format(.Range("C" & lng),
"yyyy") _
& " " & "di Euro " & Format(.Range("f" & lng), "#,##0.00") & " " &
NONPAGATA
grazie e buona domenica
Scossa
Il grassetto (o gli altri attributi) a livello di singoli caratteri in
una cella puoi applicarli solo se la cella contiene testo.
Quindi dovresti prima convertire la formula nella cella in testo e poi
puoi applicare gli attributi, p.e.:
With miacella.Characters(Start:=4, Length:=2).Font
.FontStyle = "Grassetto"
end with
Bye!
Scossa
eliano
Ciao Andrea.
Dove si trova quell'espressione della quale ne vuoi formattare solo
una parte?
Saluti
Eliano
elby
Per la manipolazione di vari formati concatenati in una singola
stringa c'è qui un mio contributo nel sito:
http://groups.google.com/group/microsoft.public.it.office.excel/browse_thread/thread/f38a0d790994b46e/427790e2099d7bb3?q=
Elio
eliano
>
> Elio- Nascondi testo citato
>
> - Mostra testo citato -
Ciao Elio.
Mi sembra di capire che l'OP vuole modificare la formattazione di una
parte di una istruzione Vba, pensando (forse) di formattare il dato di
riferimento, oppure vuole modificare una istruzione, in grassetto,
direttamente nel VBE (chissà perchè); AFAIK cose impossibili. Attendo
smentita. :-))
Saluti
Eliano
Mauro Gamberini
> dell'espressione
>
<cut>
L'OP ha avuto la sua risposta qui:
http://www.maurogsc.eu/esempiforum10/fatturenonpagate3.zip
Credo volesse i numeri delle fatture in grassetto visto che, in altra sede
(ha postato la domanda anche altrove)
faceva riferimento ad un file precedente che non aveva quella
caratteristica.
--
---------------------------
Mauro Gamberini
Microsoft MVP - Excel
http://www.riolab.org/
http://www.maurogsc.eu/
Andrea22
ciao si confermo!!
TUTTO RISOLTO
grazie
Andrea
eliano
<maurogscRIMUOV...@RIMUOVEREaliceposta.it> wrote:
LOL
Ammeterai che coime domanda era fatta con modello: Lilli di
Budda.:-))
Ciao
Eliano
JohnB
interessato dalla discussione e dalla possibilit� di vedere la soluzione ho
scaricato il file.
Quando eseguo la macro con Ctrl+a con Excel 2007, ho questo messaggio:
Errore di run-time 457
Questa chiave � gi� associata ad un elemento dell'insieme
Con il Debug si evidenzia questa area:
col.Add .Range("A" & lng), _
CStr(.Range("A" & lng))
Sono sicuro che qualcosa non funziona sul mio Excel. � possibile ipotizzare
qualche motivo?
Grazie e ciao
Giovanni
eliano
> scaricato il file.
> Quando eseguo la macro con Ctrl+a con Excel 2007, ho questo messaggio:
> Errore di run-time 457
>
> Con il Debug si evidenzia questa area:
>
> col.Add .Range("A" & lng), _
> CStr(.Range("A" & lng))
>
> qualche motivo?
>
> Grazie e ciao
> Giovanni
Ciao Giovanni.
Ho provato a scaricare quel file e funziona benissimo.
Per quanto riguarda l'errore di runtime 457 se usi excel 97 penso che
non ci sia niente da fare.
In caso contrario prova a scaricare di nuovo il file e richiamare la
macro direttamente con ALT+F8 ed Esegui.
Eliano
JohnB
ho rifatto il download, e sulla macchina con Excel 2007 mi da errore
run-time 457.
Testato su altro Pc con Excel 2003 funziona benissimo.
Chiss� cosa non funziona sul mio pc.
Ciao e buona domenica.
Giovanni
eliano
> Ciao,
> ho rifatto il download, e sulla macchina con Excel 2007 mi da errore
> run-time 457.
> Testato su altro Pc con Excel 2003 funziona benissimo.
>
>
> Ciao e buona domenica.
> Giovanni
Non dici la Versione del tuo excel, che sembnra non essere il 2003.
Se non fosse il 97, Clicca sul punto interrogativo-->Rileva problemi e
ripristina e vedi se ti dice qualcosa.
Saluti
Eliano
eliano
Ho qualche problema con Google e non avevo letto che hai XL2007. Sorry.
eliano
>
> - Mostra testo citato -
Partito un colpo.
Non conosco il 2007, comunque prova a portare quella istruzione su una
sola riga; Cioè:
col.Add .Range("A" & lng), _
CStr(.Range("A" & lng))
col.Add .Range("A" & lng), CStr(.Range("A" & lng))
ma dubito che dipenda da quello; altrimenti aspettiamo che l'autore ci
chiarisca le idee.
Saluti
Eliano