Aider moi svp sur exel vba

Fermé
rimked - 26 janv. 2008 à 15:13
 Utilisateur anonyme - 26 janv. 2008 à 16:27
Bonjour,
Bonjour j'ai plusieurs probleme sur exel si quelqu'un peut m'aider je le remercie par avance meme pour 1 question alors j explqiue mes problemes


1)Comment faire pour ques des infos disponible dans un usurforme (et saisie par l individu) puisse etre reporter sur un autre usurforme mais ce dernier comporte d autre informations (que je souhaite calculer).

2) Comment faire pour que des saisie a partir d un usurforme puisse etre placer sous les precedante. j m explique j ai reussi a retransmettre les info de mon usurforme sur la feuille exel mais je souhaoite que c dernier puisse etre enregister sur ma feuille exel et qu une nvelle saisie puisse etre enregistre a la suite

voici ce que j ai fait
Sheets("Go Crédit").Range("A11").Value = Me.TextBox3.Text
'ce qui me permet de la fffichera la cellule A11 mais comment faire pour que la nouvelle saisie aille en dessous soit en cellule A12'
merci davance
A voir également:

1 réponse

Utilisateur anonyme
26 janv. 2008 à 16:27
Bonjour,
il faut faire une boucle qui trouve la 1 ere cellule vide

i=1
while ( sheets("Go Crédit").range("A"+cstr(i)) <> "")
j=i
i = i + 1
wend

Sheets("Go Crédit").Range("A" +cstr(j)).Value = Me.TextBox3.Text

0