Flux rss
Les formalités en ligne
pour les entreprises
Ils ont besoin de votre aide
Collection CommentCaMarche.net
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Résolu

Code vba

mjouff, le jeudi 20 novembre 2008 à 07:57:03
Bonjour,

Problème avec un code dans mon userform
nom ambigu détecté que faire

Private Sub TextBox1_AfterUpdate()
Cells(ligne, 1) = TextBox1

nom ambigu = ligne
pour info 3 userform avec 7 à 11 textbox identique 3 modules donc 3 feuil dans un fichier

Il est possible de joindre le fichier
Merci à vous
Configuration: Windows XP
Internet Explorer 7.0
Répondre à mjouff  Signaler ce message aux modérateurs Aller au dernier message

1


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
xav3601, le jeudi 20 novembre 2008 à 08:23:05
Bonjour,
Tout d'abord, les differentes userform n'ont rien a voir les unes avec les autres au niveau des variables sauf si celles si sont declaré en global.
Ma question serait:
L'erreur apparait elle sur toute vos userform?
   
Répondre à xav3601

2


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
mjouff, le jeudi 20 novembre 2008 à 09:12:43
Oui
erreur ambigu détecté apparait sur toute
   
Répondre à mjouff

3


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
xav3601, le jeudi 20 novembre 2008 à 09:30:53
Alors c'est surement que le nom de la variable doit être a un mot clé réservé dans VBA.
Essaye de remplacer cette variable par une autre du genre :
intRow
et normalement ça devrais marcher je pense.
   
Répondre à xav3601

4


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
mjouff, le jeudi 20 novembre 2008 à 09:36:13
voulez-vous le fichier pour voir le problème je ne suis pas un bosssssss en Vba
   
Répondre à mjouff

5


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
xav3601, le jeudi 20 novembre 2008 à 09:59:45
avez vous essayé de changer le nom de la variable?
   
Répondre à xav3601

6


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
mjouff, le jeudi 20 novembre 2008 à 10:30:04
Oui et ca marche pas ou je me trompe
   
Répondre à mjouff

7


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
xav3601, le jeudi 20 novembre 2008 à 10:41:08
L'erreur est toujours la même?
   
Répondre à xav3601

8


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
mjouff, le jeudi 20 novembre 2008 à 10:46:47
oui voici la formul des l'Userform la formul


Private Sub CommandButton1_Click()
'Fermeture du formulaire
UserForm1.Hide
End Sub

Private Sub TextBox1_AfterUpdate()
Cells(ligne, 1) = TextBox1

End Sub

Private Sub TextBox2_AfterUpdate()
Cells(ligne, 2) = TextBox2
End Sub

Private Sub TextBox3_AfterUpdate()
Cells(ligne, 3) = TextBox3
End Sub

Private Sub TextBox4_AfterUpdate()
Cells(ligne, 4) = TextBox4
End Sub

Private Sub TextBox5_AfterUpdate()
Cells(ligne, 5) = TextBox5
End Sub

Private Sub TextBox6_AfterUpdate()
Cells(ligne, 6) = TextBox6

End Sub

Private Sub TextBox7_AfterUpdate()
Cells(ligne, 7) = TextBox7

End Sub

Private Sub TextBox8_AfterUpdate()
Cells(ligne, 8) = TextBox8

End Sub

Private Sub UserForm_Activate()
'Réinitialisation des champs du formulaire
TextBox1 = ""
TextBox2 = ""
TextBox3 = ""
TextBox4 = ""
TextBox5 = ""
TextBox6 = ""
TextBox7 = ""
TextBox8 = ""

End Sub

pouvez vous noter la formule SVP
   
Répondre à mjouff

9


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
xav3601, le jeudi 20 novembre 2008 à 10:55:25
Je pense que l'erreur viens du fait que vous utilisez :

userform1.hide -> ne ferme pas la userform mais la cache, donc ligne est bien défini a plusieurs endroit en mm temps!

Utilisez plutôt :
unload userform1 qui ferme complètement la userform :)
   
Répondre à xav3601

10


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
mjouff, le jeudi 20 novembre 2008 à 11:10:10
Ca marche pas (erreur de compilation nom ambigu détecté : ligne)
il y à aussi des modules avec le code

'Définition de deux variables publiques
'Une pour la ligne et l'autre pour la colonne pour placer le curseur
'où l'on souhaite
Public ligne, colonne
Sub Bouton11_QuandClic()
'Initialisation des variables pour placer le curseur en A2
ligne = 2
colonne = 1
'Selection de la première cellule du tableau
Range("A2").Select
'Boucle itérative pour rouver la première cellule vide
Do Until IsEmpty(Cells(ligne, colonne))
'Incrémentation de la variale ligne (si non vide)
ligne = ligne + 1
Loop
'Selection de la première cellule cide trouvée
Cells(ligne, colonne).Select
'Affichage du formulaire
UserForm1.Show
End Sub

Si je sup 2 modules et 2 userforme ca marche bien
je ne vois pas ou est le problème
   
Répondre à mjouff

11


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
xav3601, le jeudi 20 novembre 2008 à 11:13:12
Mais change le userform.hide en unload userform et change le nom de ta variable aussi!
   
Répondre à xav3601

12


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
mjouff, le jeudi 20 novembre 2008 à 12:10:07
Ca marche

mais les valeurs ne s'affiche pas dans ma feuil !!!!!!
   
Répondre à mjouff

13


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
xav3601, le jeudi 20 novembre 2008 à 12:13:26
Essaye
activesheet.cells(ligne, 1)
   
Répondre à xav3601

14


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
mjouff, le jeudi 20 novembre 2008 à 12:34:37
Non ca marche pas je cherche pourtant

peut-être le module (non)

peut-être Private Sub TextBox1_Introw ( ICI )

:-)
   
Répondre à mjouff

15


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
 Martial, le jeudi 20 novembre 2008 à 18:38:18
RE bonjour,

la formul marche mais les valeur qui sont dans l'userform
ne s'affiche pas dans ma feuil
   
Répondre à Martial
Posez votre question Répondre

Résultats pour code vba

Code VBA pour effacer controles après click (Résolu) Bonjour, Je suis à la recherche d'un code VBA pour effacer différents controles (TextBox et OptionButton) après un clique dans un CommandButton. Je suis débutant et je ne connais pas grand chose. J'ai découvert il n'y pas longtemps les... www.commentcamarche.net/forum/affich-5620062-code-vba-pour-effacer-controles-apres-click
Code Vba Pour masquer les Feuilles (Résolu) Bonjour, Je voudrais un code vba pour masquer les feuilles d'un classeur qu'on ne peut pas les afficher à partir du Format/Feuille/Afficher. Avec tous mes respects. www.commentcamarche.net/forum/affich-4676579-code-vba-pour-masquer-les-feuilles
Modèle Excel - Code VBA (Résolu) Bonjour, J'ai un petit problème avec du code VBA dans un modèle Excel. Ce que ça doit faire: -Lorsque j'ouvre un fichier en partant du modèle (fichier.xlt) (Double-clique dessus) le fichier doit incrémenter de 1 le nombre d'une cellule... www.commentcamarche.net/forum/affich-6149950-modele-excel-code-vba

Résultats pour code vba

VBA Ajouter commandButton et le code qui va avecCode relativement simple et qui ne nécessite pas d'explication complémentaire. Coller ces deux sub dans un module général (Module1 par exemple). Sub CréerBouton() Dim Obj As Object Dim Code As String Sheets("Feuil1").Select 'crée le... www.commentcamarche.net/faq/sujet-11237-vba-ajouter-commandbutton-et-le-code-qui-va-avec
VBA et les collections d'objets.VBA et les collections d'objets Quand plusieurs (beaucoup de) contrôles sont mis sur une feuille ou un Userform il est parfois fastidieux d'écrire du code dans chaque évènement des contrôles. Ce Tuto vous permet de traiter vos contrôles comme... www.commentcamarche.net/faq/sujet-10397-vba-et-les-collections-d-objets
Réponses suivantes

Résultats pour code vba

Erreur code vba (Résolu)Bonjour, j ai ecrit un code vba mais il me donne une erreur lors de l execution est ce que vous pouvvez maider a la corriger??? merci d avance www.commentcamarche.net/forum/affich-7525929-erreur-code-vba
Explication code vba (Résolu)Bonjour, derLig = Range("A" & Cells.Rows.Count).End(xlUp).Row Je souhaiterai avoir une explication détaillé de ce code vba (comme pour un enfant de 6an,lol). Je sais que cela veut dire "récupération de la dernière ligne non vide de la colonne A"... www.commentcamarche.net/forum/affich-5866016-explication-code-vba
VBA ACCESS : valeur de champ automatique (Résolu)Bonjour, Je souhaite écrire un petit code VBA spécifiant que le champ "Type" doit prendre automatiquement une valeur donnée (par exemple "Accessoires") lorsqu'on insère un nouvel enregistrement dans le formulaire. Quelle est la syntaxe ? Merci www.commentcamarche.net/forum/affich-5383877-vba-access-valeur-de-champ-automatique
Réponses suivantes

Résultats pour code vba

Les langages informatiquesLangage informatique On appelle « langage informatique » un langage destiné à décrire l'ensemble des actions consécutives qu'un ordinateur doit exécuter. Un langage informatique est ainsi une façon pratique pour nous (humains) de donner des... www.commentcamarche.net/contents/langages/langages.php3
Réponses suivantes