Oppure

Loading
14/04/11 10:04
symonx80
Ciao,
sto scrivendo dei dati all'interno di un file excel e ho necessità di formattare ogni cella in formato testo.
E' possibile farlo da codice?
Pensavo ad un comando da inserire prima di inserire i valore all'interno della cella
ws.Cells(5, 30) = "04/11/2010"
Il motivo è dovuto al fatto che così com'è mi ritrovo la cella formattata a data e la data che dovrebbe essere 04/11/2010 mi diventa 11/04/2010
Grazie
aaa
14/04/11 11:18
poeo85
        oWorkbook.Sheets(oWorkbook.Sheets.Count).Range("B" & nRigaIn & ":I" & nRiga).HorizontalAlignment = ALLIGN_RIGHT
        oWorkbook.Sheets(oWorkbook.Sheets.Count).Range("F" & nRigaIn & ":F" & nRiga).HorizontalAlignment = ALLIGN_LEFT
        
        oWorkbook.Sheets(oWorkbook.Sheets.Count).Range("C" & nRigaIn & ":C" & nRiga).NumberFormat = "dd/mm/yyyy"
        oWorkbook.Sheets(oWorkbook.Sheets.Count).Range("O" & nRigaIn & ":O" & nRiga).NumberFormat = "dd/mm/yyyy"

        oWorkbook.Sheets(oWorkbook.Sheets.Count).Range("M" & nRigaIn & ":M" & nRiga).NumberFormat = "@" 'testo
        oWorkbook.Sheets(oWorkbook.Sheets.Count).Range("K" & nRigaIn & ":L" & nRiga).NumberFormat = "0.00"
        oWorkbook.Sheets(oWorkbook.Sheets.Count).Range("M" & nRigaIn & ":N" & nRiga).NumberFormat = "0.000"


ti ho scritto anche altri settaggi che uso abitualmente....se ti possono servire...ciaoooo
aaa
14/04/11 12:25
symonx80
Ti ringrazio molto
Secondo te mettere ws.Cells(5, 30) = "'04/11/2010" sarebbe un modo 'alternativo' per aggirare l'ostacolo?
Il tuo codice è stato molto utile!!
aaa