Prob code VB excel 97 et excel 2003 aidez moi svp

[zotar]

Bonjour

Cette commande tourne sous excel 2003:

Tabl = Split(nom, Chr(32))

Par contre sa plante sous excel 97

Avez vous une idée sur sa????


Merci d'avance

 

[Creepy]

Hello,

Effectivement cette commande n'est apparue qu'avec Excel 2000 je crois.

Tu ne risques donc pas de la faire tourner sous 97 !

En faites tu veux recuperer le nom et d'un case contenant nom prenon je pense :

Essaie ca mais à adapter à tes besoins :

Dim Nom As String
Dim Prenon As String
'On part du principe que le nom est à droite et le prenom à gauche
'Que les deux sont séparés par un espace
'Que le contenu de te cellule est dans nomprenom par exemple
Nom = Mid(nomprenom, InStr(nomprenom, ' ' + 1), Len(nomprenom))
Prenom = Mid(nomprenom, 1, InStr(nomprenom, ' ' - 1))

'dans cet exemple si nomprenom 'dede dupont'
' nom = Dupont
' prenom=dede

@+

Creepy

 

[zotar]

Rerob code VB excel 97 et excel 2003 aidez moi s

Bonjour merci pour ton aide mais le souci est que :

Tabl = Split(nom, Chr(32))

Tabl est une variable et nom aussi et je n'arrive pas a adapeter le code que tu ma fourni au code deja présent.

Tu pourais m'aider???

 

[zotar]

Rerob code VB excel 97 et excel 2003 aidez moi s

Voici quelque variable que j'utilise:

Dim nom As String, NomLien As String, couleur As String
Dim Tabl As Variant
Dim rep As String


et voici un petit descriptif des focntions qui se passe:

nom = Me.TxtB_Ajout.Value
'ici on rempli un tableau avec les différentes parties du nom prénom séparées par un espace
Tabl = Split(nom, Chr(32))
'ici on donne à la variable NomLien le Nom(1ère élément du Tableau)
NomLien = Tabl(LBound(Tabl))


Tu sais adapter sa sous excel 97?

 

[Creepy]

Rerob code VB excel 97 et excel 2003 aidez moi s

Hello,

N'ayant pas Excel 97, je peux difficilement tester ce qui passe ou ne passe pas !

Ca va être dur de t'aider l'ideal serait une âme charitable avec excel 97 qui pourrait t'aider !!

A votre bon coeur !!

++

Creepy

 

[zotar]

Rerob code VB excel 97 et excel 2003 aidez moi s

ok merci

En éspérant que quelqu'un vienne m'aider

Cordialement

Zotar