Gestion valeur = au début d'une cellule
Résolu/Fermé
rodg45
Messages postés
6
Date d'inscription
lundi 4 juillet 2016
Statut
Membre
Dernière intervention
5 juillet 2016
-
4 juil. 2016 à 14:22
rodg45 Messages postés 6 Date d'inscription lundi 4 juillet 2016 Statut Membre Dernière intervention 5 juillet 2016 - 5 juil. 2016 à 15:30
rodg45 Messages postés 6 Date d'inscription lundi 4 juillet 2016 Statut Membre Dernière intervention 5 juillet 2016 - 5 juil. 2016 à 15:30
A voir également:
- Gestion valeur = au début d'une cellule
- Aller à la ligne dans une cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Faites afficher avec un fond coloré les cellules qui contiennent une valeur comprise entre 250 et 350. quel nombre est dessiné en surbrillance ? ✓ - Forum Excel
- Verrouiller une cellule excel - Guide
- Le fichier contient le nombre de voyageurs dans 3 gares. dans la cellule b5, saisissez une formule qui calcule le total et se met à jour si on change une valeur du tableau. quel total obtenez-vous ? quelle formule avez-vous saisie ? ✓ - Forum Google Docs
2 réponses
jordane45
Messages postés
38424
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
16 février 2025
4 734
4 juil. 2016 à 14:35
4 juil. 2016 à 14:35
Bonjour,
Saisie une apostrophe avant le = permet de l'écrire dans une cellule sans qu'il ne soit interprété comme le début d'une formule.
Saisie une apostrophe avant le = permet de l'écrire dans une cellule sans qu'il ne soit interprété comme le début d'une formule.
rodg45
Messages postés
6
Date d'inscription
lundi 4 juillet 2016
Statut
Membre
Dernière intervention
5 juillet 2016
Modifié par jordane45 le 5/07/2016 à 14:14
Modifié par jordane45 le 5/07/2016 à 14:14
Voila une partie du code
==> ça plante sur la comparaison car le contenu de Feuil1.Cells(£Ligne, 15) contient Erreur2029
Merci pour ton aide
EDIT : AJOUT DES BALISES DE CODE
'Boucle de recopie des Critères et valeurs, fonctionnement OK £Col = 13 For £I = 1 To £NbCritere Feuil1.Cells(£LigLibMax, £Col + 1) = £TabCritere(£I, £TabIndice(0)) £Critere = £TabCritere(£I, £TabIndice(£I)) Feuil1.Cells(£LigLibMax, £Col + 2).Value = £Critere £Col = £Col + 2 Next £TabIndice(£NbCritere) = £TabIndice(£NbCritere) + 1 'Boucle de recherche d'un doublon pour savoir si l'on doit copier les critères valeurs UnControleFaux = False £Ligne = 7 Do While Feuil1.Cells(£Ligne, 11) <> "" If £TabCritere(1, £TabIndice(1)) = Feuil1.Cells(£Ligne, 15) And _ £TabCritere(2, £TabIndice(2)) = Feuil1.Cells(£Ligne, 17) And _ £TabCritere(3, £TabIndice(3)) = Feuil1.Cells(£Ligne, 19) And _ £TabCritere(4, £TabIndice(4)) = Feuil1.Cells(£Ligne, 21) And _ £TabCritere(5, £TabIndice(5)) = Feuil1.Cells(£Ligne, 23) And _ £TabCritere(6, £TabIndice(6)) = Feuil1.Cells(£Ligne, 25) And _ £TabCritere(7, £TabIndice(7)) = Feuil1.Cells(£Ligne, 27) And _ £TabCritere(8, £TabIndice(8)) = Feuil1.Cells(£Ligne, 29) And _ £TabCritere(9, £TabIndice(9)) = Feuil1.Cells(£Ligne, 31) And _ £TabCritere(10, £TabIndice(10)) = Feuil1.Cells(£Ligne, 33) Then UnControleFaux = True £Ligne = 50000 End If £Ligne = £Ligne + 1 Loop
==> ça plante sur la comparaison car le contenu de Feuil1.Cells(£Ligne, 15) contient Erreur2029
Merci pour ton aide
EDIT : AJOUT DES BALISES DE CODE
jordane45
Messages postés
38424
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
16 février 2025
4 734
5 juil. 2016 à 14:17
5 juil. 2016 à 14:17
Lorsque tu écris (ou lis) les valeurs des cellules... penses à préciser : .value
Par exemple :
A remplacer par :
Ensuite... si tes valeurs commencent par le signe "=" ... mets une quote devant pour éviter que ça ne soit ensuite interprété comme un formule.
Un truc du genre :
Par exemple :
Feuil1.Cells(£LigLibMax, £Col + 1) = £TabCritere(£I, £TabIndice(0))
A remplacer par :
Feuil1.Cells(£LigLibMax, £Col + 1).value = £TabCritere(£I, £TabIndice(0))
Ensuite... si tes valeurs commencent par le signe "=" ... mets une quote devant pour éviter que ça ne soit ensuite interprété comme un formule.
Un truc du genre :
Feuil1.Cells(£LigLibMax, £Col + 1).value = "'" & £TabCritere(£I, £TabIndice(0))
rodg45
Messages postés
6
Date d'inscription
lundi 4 juillet 2016
Statut
Membre
Dernière intervention
5 juillet 2016
>
jordane45
Messages postés
38424
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
16 février 2025
5 juil. 2016 à 14:38
5 juil. 2016 à 14:38
Merci beaucoup, quand je rajoute la concaténation de mon critère par "'" &, ça fonctionne parfaitement et en plus, l’apostrophe n’apparaît pas dans le formulaire.
jordane45
Messages postés
38424
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
16 février 2025
4 734
>
rodg45
Messages postés
6
Date d'inscription
lundi 4 juillet 2016
Statut
Membre
Dernière intervention
5 juillet 2016
5 juil. 2016 à 14:42
5 juil. 2016 à 14:42
Comme je te l'avais dit dans ma réponse précédente .....
voilou....
PS: pense à mettre le sujet en RESOLU.
Saisie une apostrophe avant le = permet de l'écrire dans une cellule sans qu'il ne soit interprété comme le début d'une formule
voilou....
PS: pense à mettre le sujet en RESOLU.
rodg45
Messages postés
6
Date d'inscription
lundi 4 juillet 2016
Statut
Membre
Dernière intervention
5 juillet 2016
>
jordane45
Messages postés
38424
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
16 février 2025
5 juil. 2016 à 15:30
5 juil. 2016 à 15:30
Le problème c'est que j'ajoutais l'apostrophe lors de l'enregistrement et je pensais que je pouvais récupérer la valeur tel que mais non, il faut également ajouter l'apostrophe lorsque l'on récupère la valeur.
4 juil. 2016 à 14:44
4 juil. 2016 à 14:49
4 juil. 2016 à 14:52