Groups > it.comp.lang.visual-basic > #19630

Re: VB6 Excel .NumberFormat

Path	csiph.com!aioe.org!.POSTED.xmS+GcS3lvLKZLOoI4PlUQ.user.gioia.aioe.org!not-for-mail
From	"Sauro" <vicchi@crsscala.it>
Newsgroups	it.comp.lang.visual-basic
Subject	Re: VB6 Excel .NumberFormat
Date	Sun, 5 May 2019 19:33:47 +0200
Organization	Aioe.org NNTP Server
Lines	36
Message-ID	<qan6pn$1jk6$1@gioia.aioe.org> (permalink)
References	<qac8k5$b6n$1@gioia.aioe.org> <1f0bag9greux7$.1jna4oep2qjpn$.dlg@40tude.net>
NNTP-Posting-Host	xmS+GcS3lvLKZLOoI4PlUQ.user.gioia.aioe.org
X-Complaints-To	abuse@aioe.org
X-MSMail-Priority	Normal
X-RFC2646	Format=Flowed; Original
X-Priority	3
X-Notice	Filtered by postfilter v. 0.9.2
X-MimeOLE	Produced By Microsoft MimeOLE V6.00.2900.6157
X-Newsreader	Microsoft Outlook Express 6.00.2900.5931
Xref	csiph.com it.comp.lang.visual-basic:19630

Show key headers only | View raw

.Columns(C).NumberFormat = "@"

Fino ad un certo punto il comando suddetto mi dava il seguente errore.

Errore di run time '1004'
Impossibile impostare la proprietà NumberFormat per la classe range.

Poi dopo che ho letto il tuo post ci ho riprovato e funziona.
Forse nella prima prova avevo sbagliato qualche altro riferimento.

Ciao Freccia e grazie
Sauro



"Freccia (VegetaSSj)" <NIENTESPAMfreccia_vegetassj@hotmail.invalid> ha 
scritto nel messaggio news:1f0bag9greux7$.1jna4oep2qjpn$.dlg@40tude.net...
> Su "it.comp.lang.visual-basic",  ==Sauro=> ha scritto:
>
>> Siccome conosco il tipo di campo che devo mettere
>> nelle singole celle ho deciso di faree così per ogni campo:
>>
>> If TipoCampo = "Text" then
>>     .cells(r, c).NumberFormat = "@"
>> End If
>> .cells(r, c) = Campo(r)
>>
>> Se pensate che ci sia qualcosa di meglio...
>
> Questa cosa la puoi fare per tutta la colonna in un colpo solo. Se
> esporti una tabella di norma ti dovrebbe andare bene.
>
> -- 
> Freccia@Bulldozer63 :D

Back to it.comp.lang.visual-basic | Previous | Next — Previous in thread | Find similar

Thread

VB6  Excel   .NumberFormat "Sauro" <vicchi@crsscala.it> - 2019-05-01 15:57 +0200
  Re: VB6  Excel   .NumberFormat "Freccia (VegetaSSj)" <NIENTESPAMfreccia_vegetassj@hotmail.invalid> - 2019-05-02 19:48 +0200
    Re: VB6  Excel   .NumberFormat "Sauro" <vicchi@crsscala.it> - 2019-05-05 19:33 +0200

csiph-web