VBA insertion chaine contenant = et parenthèses

aclech · 25 Octobre 2012

bonjour

je demande un peu d'aide car la je suis perdu

j'ai une erreur 1004 avec le code suivant (ligne ou j'affecte la valeur toto dans la cellule)
pouvez vous me dire ce qui cloche ?
j'ai utiliser des Chr pour échapper les caractères = et () mais il ne veut toujours pas

Dim i As Integer
Dim Col As String
Dim wbOriginal As Workbook
Dim toto As String

Set wbOriginal = Application.ActiveWorkbook

On Error GoTo GestErreurs

For i = 9 To 250
Col = NumCol2Lettre(i)
toto = Chr(61) & "SOMME.SI.ENS" & Chr(40) & Col & "12:" & Col & "598;C12:C598;C606" & Chr(41)
wbOriginal.Sheets(1).Range(Col & "606") = toto
Next i

Exit Sub

david84 · 25 Octobre 2012

Re : VBA insertion chaine contenant = et parenthèses

Bonjour,
sans fichier pour tester...place toto entre guillemets au cas où.
A+

Pierrot93 · 25 Octobre 2012

Re : VBA insertion chaine contenant = et parenthèses

Bonjour,

A priori, ton "range" est erroné... utilise "cells" si "col" continent le numéro de colonne et si "646" est le numéro de ligne :

Code:

wbOriginal.Sheets(1).Cells(606, Col) = toto

bon après midi
@+

aclech · 26 Octobre 2012

Re : VBA insertion chaine contenant = et parenthèses

j'ai essayé la solution de Pierrot93 mais c'est idem

ci joint le fichier

Grand Chaman Excel · 26 Octobre 2012

Re : VBA insertion chaine contenant = et parenthèses

Bonjour,

Le truc, c'est qu'il faut écrire la formule en US, en utilisant les , au lieu des ; comme séparateur :

Voici :

VB:

For i = 9 To 250
    Col = NumCol2Lettre(i)
    'toto = Chr(61) & "SOMME.SI.ENS" & Chr(40) & Col & "12:" & Col & "598;C12:C598;C606" & Chr(41)
    'wbOriginal.Sheets(1).Range(Col & "606") = toto
    toto = "=Sumifs(" & Col & "12:" & Col & "598,C12:C598,C606)"
    wbOriginal.Sheets(1).Range(Col & "606").Formula = toto
Next i

A+

aclech · 29 Octobre 2012

Re : VBA insertion chaine contenant = et parenthèses

trop fort !
ca fonctionne comme je voulais

merci Grand chaman

par contre c'est noté qqpart dans l'aide excel que les formules doivent être insérées en anglais !!

VBA insertion chaine contenant = et parenthèses

aclech

XLDnaute Nouveau

david84

XLDnaute Barbatruc

Pierrot93

XLDnaute Barbatruc

aclech

XLDnaute Nouveau

Pièces jointes

Grand Chaman Excel

XLDnaute Impliqué

aclech

XLDnaute Nouveau

Discussions similaires