Textbox rectifié dns VBA

Bonjour à tous

Je dois plus me rappeler comment appeler ce code:

J'ai une base que je voudrai rectifier à partir d'un USF . Dans la base existant des adhérents j'ai une colonne "Téléphone" en "H".

Dans mon USF j'ai un textbox qui est nommé "Tel".

Lors d'une rectification du n° de téléphone je désirerai qu'il me recherche dans ma liste le nom de l'adhérent et qu'il aille rectifié lma cellule appropriée dans mon tableur.

Voici mon code :

Private Sub CommandButton1_Click()
With Sheets("Adherents")
  ' .Range("h" & lgart) = (Me.ObsCliPge2)
    .Range("f" & lgart) = Me.Tel
End With
'Unload Me
End Sub

avec ce code j'ai une erreur.

Une ame charitable pour m'aider à résoudre ce code

Merci d'avance

Amicalement

Noël

Bonjour

Plus de 1000 messages et tu ne sais pas qu' un fichier augmente tes chances d'avoir une bonne réponse

Quel message d'erreur as-tu ?

A part la mauvaise colonne ton code me parait correct

lgart est bien initialisé ?

En attente

Re

Bonjour Banzai64,

Je suis désolé, malheureusement je ne peux pas te fournir le fichier car il est trop lourd.

Quand je le fais volontiers.

L'erreur qu'il me donne sur 2 lignes

Erruer d'exécution '1004':

erreur définie par l'application ou par l'objet.

Merci de aide

Amicalement

Noel

Re,

J'ai oublié de te répondre pour ta question.

LgArt est bien initialisé par le code suivant

Dim Lgart As Integer

@+

Amicalement

Noel

Bonjour

Pas facile

Tu m'as juste donné la déclaration de la variable

LgArt est bien initialisé par le code suivant

Moi je te demande l'initialisation : du style Lgart = 28 ou ......

Et en passant par cjoint pour ton fichier ?

Re,

Là je ne comprends pas ta question par LgArt=28 ou...

Peux_tu m'apporte un peu plus d'explication

merci

@+

Bonjour

Il ne faut pas inverser les rôles

Dans ton code as tu une ligne du style Lgart= ..... ?

Tu vois qu'un fichier éviterait beaucoup de questions inutiles

Et même un fichier simplifié (allégé) mais avec l'erreur aurait suffit

Bonjour à tous,

Bonjour Bonzai,

Excuse moi je n'ai pas voulu inverser les rôles.

Je vais essayer de faire une copie d'un bout de projet que je t'enverrai.

Dans le cas contraire je peux t'envoyer le fichier dans sa totalité par mail perso .

Dis moi ce que tu préfères?

Merci d'avance

Amicalement*Noel

Re

Mon cher Bonzai, j'ai préparé un bout du fichierque je t'anvoie.

J'espère que tu comprendra mieux ce que je veux.

Quand je suis en édition d'une fiche je voudrai pouvoir rectifier des textbox tels que Tel, Adress, CP, et obs.

Sachant que le nom ne change pas ainsi que le code.

Lors de la rectification j'aimerai que les champs rectifiés aillent rectifier dans le tableur les cellules concernées.

Merci de ton aide

@+

Amicalement

Noel

Bonjour

Pas tout vérifier ton code

A voir

Bonjour à tous,

Bonjour mon cher Bonzai,

Merci pour ton aide toujours si précieuse.

Ca fonctionne à merveille, je vais l'intégrer à mon code.

Amicalement

Noel