| Voir le sujet précédent :: Voir le sujet suivant |
| Auteur |
Message |
Tee Shot
Admin
Inscrit le: 09 Jan 2004
Messages: 2277
Game Trophies: 5
Membre du Hall de Célébrités
Localisation: Bordeaux (St Jean D'illac)
Points: 40745
|
 Posté le: 28 Fév 2007 à 16:59 Sujet du message: |
 |
|
Re
Pour H le problème vient du fait que tu le laisse sur F, donc :
| Code: | | Range("H" & Range("Entretien!H65536").End(xlUp).Row + 1).Value = nitrate1 |
au lieu de
| Code: | | Range("H" & Range("Entretien!F65536").End(xlUp).Row + 1).Value = nitrate1 |
pour effacer tu mets :
| Code: | Private Sub UserForm_Initialize()
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
End Sub |
pour ouate j'ai pas vu le problème, à voir si ça persiste.
Tcho
_________________
Voter pour se site -----> 
Merci !! |
|
| Revenir en haut |
|
 |
|
|
 |
Frédéric
Maître
Inscrit le: 13 Mai 2006
Messages: 579
Points: 11520
|
| Posté le: 28 Fév 2007 à 17:20 Sujet du message: |
|
|
Merci
Mais si je met "H" à ,la place de "F" alors ça ne dépend plus de F alors tout sera décalé.
Pour ouate j'ai trouver le problème, en fait j'ai oublié d emettre un "s".
Tcho
_________________
 |
|
| Revenir en haut |
|
|
Tee Shot
Admin
Inscrit le: 09 Jan 2004
Messages: 2277
Game Trophies: 5
Membre du Hall de Célébrités
Localisation: Bordeaux (St Jean D'illac)
Points: 40745
|
| Posté le: 28 Fév 2007 à 19:59 Sujet du message: |
|
|
Non la hauteur de la ligne est définie par le premier F avec la variable ligne :
| Code: | | Ligne = Range("Entretien!f65536").End(xlUp).Row + 1 |
La variable ligne ne donne que le N° de ligne trouvé dans la colonne F et ça démarre de la.
Donc avec celui la il donne dans la colonne H la ligne donnée par F :
| Code: | | Range("H" & Ligne).Value = charbon1 |
Tu le laisse comme ça, ensuite la ligne doit bien être comptée sur H sinon ça reste à la hauteur de la ligne F ce qui fait que un mot ecrase l'autre.
J'espère que je suis clair ? 
_________________
Voter pour se site ----->
Merci !! |
|
| Revenir en haut |
|
|
Frédéric
Maître
Inscrit le: 13 Mai 2006
Messages: 579
Points: 11520
|
| Posté le: 28 Fév 2007 à 20:26 Sujet du message: |
|
|
Merci
D'accord mais de temps en temps H est supérieur à F. Donc il faut le faire pour les 2 lignes. je fait comme tu as indiqué plus haut?
Tcho
_________________
|
|
| Revenir en haut |
|
|
Tee Shot
Admin
Inscrit le: 09 Jan 2004
Messages: 2277
Game Trophies: 5
Membre du Hall de Célébrités
Localisation: Bordeaux (St Jean D'illac)
Points: 40745
|
| Posté le: 28 Fév 2007 à 22:24 Sujet du message: |
|
|
Oui
Mais tu ne veux pas la colonne h soit aligner sur la ligne date ?
_________________
Voter pour se site ----->
Merci !! |
|
| Revenir en haut |
|
|
Frédéric
Maître
Inscrit le: 13 Mai 2006
Messages: 579
Points: 11520
|
| Posté le: 28 Fév 2007 à 23:32 Sujet du message: |
|
|
Si je veux que ce soit aligné, mais date c'est B, or F est plus rempli que B.
Tcho
_________________
|
|
| Revenir en haut |
|
|
Tee Shot
Admin
Inscrit le: 09 Jan 2004
Messages: 2277
Game Trophies: 5
Membre du Hall de Célébrités
Localisation: Bordeaux (St Jean D'illac)
Points: 40745
|
| Posté le: 01 Mar 2007 à 00:18 Sujet du message: |
|
|
Oui mais tout est indexe sur la colonne F, la date se mettra sur la première ligne de F (c'est la variable "ligne")et cette ligne ne changera pas pour toutes les premières lignes de chaques colonnes, ensuite les lignes de F ou de H se calculeront sans la variable "ligne", uniquement en cherchant la première ligne vide de leurs propre colonne. Le seul bug qu'il peut y avoir est uniquement si H est plus long que F, vu que tout est indéxé sur F, il faudrait donc lui dire de calculer les 2 et de prendre le nombre le plus grand pour la variable "ligne".
tu mets bien h ou je t'ai dit et tu remplaces
| Code: | | Ligne = Range("Entretien!f65536").End(xlUp).Row + 1 |
par
| Code: | If Range("Entretien!f65536").End(xlUp).Row + 1 > Range("Entretien!h65536").End(xlUp).Row + 1 Then
Ligne = Range("Entretien!f65536").End(xlUp).Row + 1
Else: Ligne = Range("Entretien!h65536").End(xlUp).Row + 1
End If |
essaie tu verras que ça ira
_________________
Voter pour se site ----->
Merci !! |
|
| Revenir en haut |
|
|
Frédéric
Maître
Inscrit le: 13 Mai 2006
Messages: 579
Points: 11520
|
| Posté le: 01 Mar 2007 à 10:34 Sujet du message: |
|
|
Merci Tee Shot ça fonctionne nickel. Par contre ça | Code: | Private Sub UserForm_Initialize()
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
End Sub |
je le met où?
Après dans la partie Command....?
Tcho
_________________
|
|
| Revenir en haut |
|
|
Tee Shot
Admin
Inscrit le: 09 Jan 2004
Messages: 2277
Game Trophies: 5
Membre du Hall de Célébrités
Localisation: Bordeaux (St Jean D'illac)
Points: 40745
|
| Posté le: 01 Mar 2007 à 10:58 Sujet du message: |
|
|
C'est une macro à part entière, tu la mets dans le userform concerné, la commande UserForm_Initialize() se lance à l'ouverture du UserForm.
Tu penses à remplacer TextBox1 par le nom de tes TextBox.
_________________
Voter pour se site ----->
Merci !! |
|
| Revenir en haut |
|
|
Frédéric
Maître
Inscrit le: 13 Mai 2006
Messages: 579
Points: 11520
|
| Posté le: 01 Mar 2007 à 11:29 Sujet du message: |
|
|
Ok merci
_________________
|
|
| Revenir en haut |
|
|
Frédéric
Maître
Inscrit le: 13 Mai 2006
Messages: 579
Points: 11520
|
| Posté le: 01 Mar 2007 à 11:47 Sujet du message: |
|
|
Ca ne fonctionne pas. Mais ce n'est pas grave car j'ai trouvé la solution.
Je met | Code: | TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = "" |
juste après le classement
Tcho
_________________
|
|
| Revenir en haut |
|
|
Frédéric
Maître
Inscrit le: 13 Mai 2006
Messages: 579
Points: 11520
|
| Posté le: 01 Mar 2007 à 13:25 Sujet du message: |
|
|
Pour les CheckBox je met quoi? Car avec .Value ça ne fonctionne pas.
Tcho
_________________
|
|
| Revenir en haut |
|
|
Tee Shot
Admin
Inscrit le: 09 Jan 2004
Messages: 2277
Game Trophies: 5
Membre du Hall de Célébrités
Localisation: Bordeaux (St Jean D'illac)
Points: 40745
|
| Posté le: 01 Mar 2007 à 22:12 Sujet du message: |
|
|
Re
Pour les CheckBox1
| Code: | | checkbox1.value=false |
pour vide et
| Code: | | checkbox1.value=true |
pour coché.
Tcho
_________________
Voter pour se site ----->
Merci !! |
|
| Revenir en haut |
|
|
Frédéric
Maître
Inscrit le: 13 Mai 2006
Messages: 579
Points: 11520
|
| Posté le: 01 Mar 2007 à 22:13 Sujet du message: |
|
|
Merci beaucoup
Tcho
_________________
|
|
| Revenir en haut |
|
|
|
FAQ
Rechercher
Liste des Membres
Groupes d'utilisateurs
Jeux
S'enregistrer
Profil
Se connecter pour vérifier ses messages privés
Connexion
Aide excel
