[VBA] remplir un tableau via un InputBox
Résolu/Fermé
A voir également:
- [VBA] remplir un tableau via un InputBox
- Tableau croisé dynamique - Guide
- Tableau ascii - Guide
- Organigramme a remplir word - Guide
- Tableau word - Guide
- Clémence souhaite faire calculer automatiquement les prix de 30 produits dans trois devises. elle a déjà saisi une formule de calcul pour le tarif du premier produit dans la première devise. corrigez sa formule afin que recopiée vers le bas puis vers la droite, elle remplisse correctement tout le tableau. - Forum Excel
9 réponses
Bonjour,
il manque quelques infos à mon gout ...
ton inputbix est dans un formulaire, ou directement sur un onglet?
le tableau est ou ?
dans un autre onglet (c'est donc une simple feuille excel) ou lui aussi, dans un formulaire ?
il manque quelques infos à mon gout ...
ton inputbix est dans un formulaire, ou directement sur un onglet?
le tableau est ou ?
dans un autre onglet (c'est donc une simple feuille excel) ou lui aussi, dans un formulaire ?
Alors :
Il s'agit d'un formulaire et le tableau est en effet sur un autre onglet (simple feuille excel)
Il s'agit d'un formulaire et le tableau est en effet sur un autre onglet (simple feuille excel)
fragi
Messages postés
12
Date d'inscription
jeudi 6 septembre 2007
Statut
Membre
Dernière intervention
19 novembre 2007
4
2 oct. 2007 à 14:27
2 oct. 2007 à 14:27
En fait ce qui me pose problème c'est le fait de déterminer la première ligne vide du tableau et de "l'activer" pour y faire figurer les données saisies ?
Une suggestion svp ?!?
Une suggestion svp ?!?
eriiic
Messages postés
24570
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
23 avril 2024
7 213
3 oct. 2007 à 17:05
3 oct. 2007 à 17:05
Bonjour,
ou en partant du bas de la feuille pour s'affranchir des éventuelles cellules vides.
1ère cellule vide suivant la dernière cellule occupée de la colonne B:
[B65536].End(xlUp).Offset(1, 0).Select
eric
ou en partant du bas de la feuille pour s'affranchir des éventuelles cellules vides.
1ère cellule vide suivant la dernière cellule occupée de la colonne B:
[B65536].End(xlUp).Offset(1, 0).Select
eric
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
fragi
Messages postés
12
Date d'inscription
jeudi 6 septembre 2007
Statut
Membre
Dernière intervention
19 novembre 2007
4
4 oct. 2007 à 09:14
4 oct. 2007 à 09:14
Salut,
Merci beaucoup, cela fonctionne parfaitement pour déterminer la première ligne vide du tableau !
Encore une petite question : quelle est la typologie pour indiquer les coordonnées de différentes cellule de la ligne « active », du genre :
Range(« ligne active » ;2) = UserForm1.TextBox.1.Value
Range(« ligne active » ;3) = UserForm1.TextBox.2.Value
??
Encore merci !
Merci beaucoup, cela fonctionne parfaitement pour déterminer la première ligne vide du tableau !
Encore une petite question : quelle est la typologie pour indiquer les coordonnées de différentes cellule de la ligne « active », du genre :
Range(« ligne active » ;2) = UserForm1.TextBox.1.Value
Range(« ligne active » ;3) = UserForm1.TextBox.2.Value
??
Encore merci !
syberio
Messages postés
32
Date d'inscription
mardi 24 janvier 2006
Statut
Membre
Dernière intervention
28 novembre 2007
57
4 oct. 2007 à 13:19
4 oct. 2007 à 13:19
bonjour,
Essaye avec la commamande activrow
ou bien tu peut utiliser la méthode OFFSET a partir de ta cellule active
ActiveCell.Offset(1, 0).Select ( apres ta boucle la cellule vide est activé, alors avec cette commande, tu te déplace a partir de cette derniere.)
il te rest a adapter
Syberio
Essaye avec la commamande activrow
ou bien tu peut utiliser la méthode OFFSET a partir de ta cellule active
ActiveCell.Offset(1, 0).Select ( apres ta boucle la cellule vide est activé, alors avec cette commande, tu te déplace a partir de cette derniere.)
il te rest a adapter
Syberio
fragi
Messages postés
12
Date d'inscription
jeudi 6 septembre 2007
Statut
Membre
Dernière intervention
19 novembre 2007
4
4 oct. 2007 à 14:30
4 oct. 2007 à 14:30
La classe !
MERCI BEAUCOUP ! ! !
MERCI BEAUCOUP ! ! !
syberio
Messages postés
32
Date d'inscription
mardi 24 janvier 2006
Statut
Membre
Dernière intervention
28 novembre 2007
57
3 oct. 2007 à 16:10
3 oct. 2007 à 16:10
bonjour,
voici une solution à ton probleme:
Utilise ce code pour chercher la derniere cellule vide: C une boucle: tant que la cellule n'est pas vide, il continu la recherche et s'arret lorsque la cellule est vide.
' selection de la case de départ
Range("B15").Select
' boucle de recherche
Do While IsEmpty(ActiveCell) = False
Selection.Offset(1, 0).Select
Loop
En esperant t'avoir aidé
Syberio
voici une solution à ton probleme:
Utilise ce code pour chercher la derniere cellule vide: C une boucle: tant que la cellule n'est pas vide, il continu la recherche et s'arret lorsque la cellule est vide.
' selection de la case de départ
Range("B15").Select
' boucle de recherche
Do While IsEmpty(ActiveCell) = False
Selection.Offset(1, 0).Select
Loop
En esperant t'avoir aidé
Syberio
bonjour
j ai un souci
je souhaite transferer des donnees qui ont ete calculees dans une macro et les envoyer sur une feuille excel du meme document pour creer un tableau mais j ai le meme probleme que precedemment c est a dire que la derniere case vide soient trouvee pour la remplir
merci de votre aide
j ai un souci
je souhaite transferer des donnees qui ont ete calculees dans une macro et les envoyer sur une feuille excel du meme document pour creer un tableau mais j ai le meme probleme que precedemment c est a dire que la derniere case vide soient trouvee pour la remplir
merci de votre aide
