Microsoft 365 ADODB : concaténer deux valeurs

VBA_dev_Anne_Marie · 20 Octobre 2021

Bonjour,

Je souhaite concaténer deux valeurs, je ne comprends pas pourquoi cela ne marche pas :

VB:

 PRT = Trim(UCase(Worksheets(1).Range("produit")).Value) & "/" & Trim(UCase(Worksheets(1).Range("CODE_COMMERCIAL")).Value)

Le résultat attendu par exemple est 35/79

Merci pour votre aide !

Compte Supprimé 979 · 20 Octobre 2021

Bonjour MarieParis,

Pourquoi nous parlez-vous d'ADODB, ça n'a absolument rien à voir avec votre code !?

Ensuite, s'il s'agit d'un tableau structuré, il faut spécifier une ligne ce qui n'est pas le cas
Sinon, si ce sont de simple cellules à priori, il n'y a pas de raison

@+

VBA_dev_Anne_Marie · 20 Octobre 2021

BrunoM45 à dit:
Bonjour MarieParis,

Pourquoi nous parlez-vous d'ADODB, ça n'a absolument rien à voir avec votre code !?

Ensuite, s'il s'agit d'un tableau structuré, il faut spécifier une ligne ce qui n'est pas le cas

@+

Pardon, j'utilise cette valeur dans ma requête ADODB, comme " where proto.CD_PROTOCOLE = '" & Code_protocole & "' etc

Compte Supprimé 979 · 20 Octobre 2021

Re,

Arf vu c'est un problème de parenthèses fermantes qui ne sont pas au bon endroit

VB:

Code_Protocole = Trim(UCase(Sheets(1).Range("produit").Value)) & "/" & Trim(UCase(Sheets(1).Range("CODE_COMMERCIAL").Value))

A+

VBA_dev_Anne_Marie · 20 Octobre 2021

BrunoM45 à dit:
Bonjour MarieParis,

Pourquoi nous parlez-vous d'ADODB, ça n'a absolument rien à voir avec votre code !?

Ensuite, s'il s'agit d'un tableau structuré, il faut spécifier une ligne ce qui n'est pas le cas
Sinon, si ce sont de simple cellules à priori, il n'y a pas de raison

@+

Vous avez raison, ça marche bien, il y avait juste un problème de parenthèses.

Microsoft 365 ADODB : concaténer deux valeurs

VBA_dev_Anne_Marie

XLDnaute Occasionnel

Compte Supprimé 979

Guest

VBA_dev_Anne_Marie

XLDnaute Occasionnel

Compte Supprimé 979

Guest

VBA_dev_Anne_Marie

XLDnaute Occasionnel

Discussions similaires