Problème pour alimenter le fichier Excel via userform
Bonjour, j'ai créé un userform pour alimenter un fichier excel.
Je rencontre un problème aléatoire mais gênant !
Lors de l'affichage de la USF, les données saisies alimentent la ligne 2 alors qu'elle est déjà saisie et que la première ligne vide est la 10m.
J'ai fait plusieurs tests :
With Sheets("Visites 2014 ")
i = Range("a65535").End(xlUp).Row + 1 '
.Cells(i, 1) = CDate(TB_DATE)
With Sheets("Visites 2014 ")
If Range("a2") <> "" Then
i = Range("a" & Rows.Count).End(xlUp).Row + 1
Else
i = 2
End If
.Cells(i, 1) = CDate(TB_DATE)
With Sheets("Visites 2014 ")
i = cells(65535,1).End(xlUp).Row + 1 '
.Cells(i, 1) = CDate(TB_DATE)
Mais rencontre le même problème....
je précise qu'en cours de test, les données s'alimentent correctement.
Quelqu'un a-t-il déjà eu ce problème? quelle solution ?
Il ne me manque "plus" que cet élément pour boucler ma macro....
MERCI d'avance !
Les syntaxes ont l'air toutes correct, n'y aurait-il pas une autre macro qui agirait sur la ligne 2
Je n'arrive pas à trouver.
je joins un fichier expurgé de données perso....
Merci en tout cas pour votre aide .
Bonjour,
Ton fichier ne fonctionne pas. (Impossible de charger le USF)
A+
Merci Galopin01 de t'intéresser à mon cas...
en pièce jointe le doc modifié
Bonjour,
Dans l'expression
i = Cells(65535, 1).End(xlUp).Row + 1 'report des données dans la feuille excel
.Cells(i, 1) = CDate(TB_DATE)
...Mettre un "point" devant .Cells(65535, 1)...
i = .Cells(65535, 1).End(xlUp).Row + 1A+
Bonjour
Bonjour galopin01
C'est la même réponse que je lui ai déjà donnée
Bonjour Galopin 01
je suis confuse : j'avais compris SANS le . devant cells...
Je recommence.....
décidément, j'ai pas de tête !
Ayéééééééééééé !
ça marche !
merci beaucoup pour votre aide !!!!!