je cree une feuille excel, puis par soucis de simpliciter je souhaiterais changer le nom des colonnes en numerique(c'est a dire de A1 vers L1C1.
Je fais comme ca :
Dim Cn As New ADODB.Connection
Dim Rec As ADODB.Recordset
Dim Exc As New Excel.Application
Dim Wb As Excel.Workbook
Dim Wt As Excel.Worksheet
Dim n As Integer
Dim Entite As String
Cn.Open priv_ODBCConnexion
RaiseEvent Info("Création du fichier excel...")
'Pas de message
Exc.DisplayAlerts = False
'transformation de a1 en L1C1
Exc.ReferenceStyle = xlR1C1
'Creation d'un classeur
Set Wb = Exc.Workbooks.Add
'Creation de la feuille de statistique
RaiseEvent Info("Création de la feuille ...")
Set Wt = Wb.Worksheets.Add
Wt.Name = "Synthese"
Wt.Range("L1C1").Font.Bold = True
Wt.Range("L1C1").Font.Size = 14
Wt.Range("L1C1").ColumnWidth = 15
...
Mais ce n'est pas accepter, je ne sais plus quoi faire.
merci d'avance a tout.
math
Cela fait la meme chose:
la feuille excel qui s'ouvre me met bien les colonnes et les lignes en RnLn.
Mais ce que je veux c'est quand je defini la feuille excel c'est de pouvoir choisir un nombre variable de colonne grace a une boucle. Ainsi si la personne choisi 5 donnees il n'apparait que colonnes, mais si elle en choisit 50 il y en a 50 qui apparaissent. Je pense le faire grace a une incrementation, mais pour cela il faudrait que je puisse pouvoir nommer les lignes et les colonnes de type RnCn et non de type Nn.
Je ne sais pas si je me suis fait bien comprendre, mais si il y a une autre solution je suis preneur.
Merci d'avance.
math