prob formula

Pierrot93

XLDnaute Barbatruc

• 21 Août 2007

• #2

Re : prob formula

Bonsoir Marcello

si j'ai bien compris, essaye peut être le code ci dessous

Code:

Range("A10").Value = Mid(Range("A8").Value, 1, 1)

bonne soirée
@+

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 21 Août 2007

• #3

Re : prob formula

Bonjour à tous,
Salut Pierrot 🙂,

Si tu souhaites écrire ta formule en FR :

Range("A10").FormulaLocal = "=STXT(collage!A8;1;1)"

Cliquez pour agrandir...

A+

 

Vote positif 0 Vote négatif

marcello06

XLDnaute Occasionnel

• 21 Août 2007

• #4

Re : prob formula

Bonsoir Pierrot93

En effet merci pour ta réponse cela fonctionne

Range("A10").Value = Mid(Sheets("Feuil2").Range("A8").Value, 1, 3)



mais dans une autre partie de mon appli j'ai aussi des concatener

comment trouver les equivalences entre un stxt==>Mid
et concatener ==> ?

je ne connais pas
merci en tout cas car on apprend toujours sur le forum

@+

 

Vote positif 0 Vote négatif

marcello06

XLDnaute Occasionnel

• 21 Août 2007

• #5

Re : prob formula

re JCGL , Pierrot

Merci JCGL c'est en effet plus facile pour moi à comprendre

Salut et merci encore pour l'aide

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 21 Août 2007

• #6

Re : prob formula

Re,

Un petit fichier d'équivalence FR/EN et EN/FR

A+

 

Dernière édition: 10 Avril 2008

Vote positif 0 Vote négatif

marcello06

XLDnaute Occasionnel

• 21 Août 2007

• #7

Re : prob formula

re re JCGL

demander voici le résultat

merci de ta vitesse et de la qualite des documents joints

Depuis plus de 1 an j'ai vraiment progresser avec ce forum

Merci un grand site

Ciao à tous

 

Vote positif 0 Vote négatif

marcello06

XLDnaute Occasionnel

• 21 Août 2007

• #8

Re : prob formula

re bonsoir à nouveau

j'ai un prob sur une formula il me place un incompatibilité de type sur la dernier ligne

Range("F4").FormulaLocal = "=STXT(collage!A9;1;1)"
Range("I4").FormulaLocal = "=collage!F9"
'********et là erreur******
Range("A4").FormulaLocal = "=CONCATENER(collage!B9;" - ";collage!C9;" - ";collage!D9;" - ";H4)"


je n'ai pas trouver "Concatener" === angl. dans le fichier de JCGL est ce la raison de l'erreur?

A toute et merci d'avance

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 21 Août 2007

• #9

Re : prob formula

Re,

Peux-tu essayer avec :

Range("A4").FormulaLocal = "=collage!B9&" - "&collage!C9&" - "&collage!D9&" - "&H4"

Cliquez pour agrandir...

Ceci dit :

Range("A4").FormulaLocal = "=CONCATENER(collage!B9;" - ";collage!C9;" - ";collage!D9;" - ";H4)"

Cliquez pour agrandir...

doit fonctionner aussi. Le problème est ailleurs

A+

 

Dernière édition: 21 Août 2007

Vote positif 0 Vote négatif

marcello06

XLDnaute Occasionnel

• 21 Août 2007

• #10

Re : prob formula

Re ,re
JCGL j'ai la même erreur

A+

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 21 Août 2007

• #11

Re : prob formula

Re,

Je viens de modifier la formule, peux-tu réessayer ?

Autrement joint ton fichier

A+

 

Vote positif 0 Vote négatif

marcello06

XLDnaute Occasionnel

• 21 Août 2007

• #12

Re : prob formula

Re

Désolé j'ai mis un peu de temps pour préparer mon fichier

le voici avec toujours la meme erreur

sur cette formule alors que les autres passent



Merci pour toutes tes réponses et ton aide JCGL

A+

 

Pièces jointes

• Erreur Formula.xls

  27 KB · Affichages: 46

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 21 Août 2007

• #13

Re : prob formula

Re,

Ton fichier en retour, le code était :

Range("A4").FormulaLocal = "=collage!B9&"" - ""&collage!C9&"" - ""&collage!D9&"" - ""&H4"

Cliquez pour agrandir...

Il fallait doubler les " de texte

Pense à zipper tes fichiers : Gain de place sur le serveur

A+

 

Dernière édition: 10 Avril 2008

Vote positif 0 Vote négatif

Gorfael

XLDnaute Barbatruc

• 21 Août 2007

• #14

Re : prob formula

marcello06 à dit:

Re

Désolé j'ai mis un peu de temps pour préparer mon fichier

le voici avec toujours la meme erreur

sur cette formule alors que les autres passent



Merci pour toutes tes réponses et ton aide JCGL

A+

Cliquez pour agrandir...

Salut
remplace dans ton code

Code:

    Range("A3").FormulaLocal = "=CONCATENER(collage!B8;" - ";collage!C8;" - ";collage!D8;" - ";H3)"
    Range("A4").FormulaLocal = "=CONCATENER(collage!B8;" - ";collage!C8;" - ";collage!D8;" - ";H3)"
    Range("A5").FormulaLocal = "=collage!B9&" - "&collage!C9&" - "&collage!D9&" - "&H4)"

Par

Code:

    Range("A3").FormulaLocal = "=CONCATENER(collage!B8;"" - "";collage!C8;"" - "";collage!D8;"" - "";H3)"
    Range("A4").FormulaLocal = "=CONCATENER(collage!B8;"" - "";collage!C8;"" - "";collage!D8;"" - "";H3)"
    Range("A5").FormulaLocal = "=collage!B9 & "" - "" & collage!C9 & "" - "" & collage!D9 & "" - "" & H4"

ça devrait être moins pire 😛
A+

NB me suis fait avoir sur la dernière ligne à cause de la parenthèse fermant et je me suis fait griller sur le poteau
Mais, je reviendrais et mon code sera le meilleur et ma réponse la plus rapide

 

Dernière édition: 21 Août 2007

Vote positif 0 Vote négatif

marcello06

XLDnaute Occasionnel

• 21 Août 2007

• #15

Re : prob formula

MERCI BEAUCOUP JCGL !!!!

Efficace comme toujours

Bonsoir et A+

PS je pense la prochaine fois à zipper promis

 

Vote positif 0 Vote négatif