Comment Transfer des donnée a un emplacement a un
Résolu/Fermé
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
-
8 juin 2018 à 20:09
luky123654 Messages postés 54 Date d'inscription lundi 1 mai 2017 Statut Membre Dernière intervention 24 août 2018 - 20 juin 2018 à 00:11
luky123654 Messages postés 54 Date d'inscription lundi 1 mai 2017 Statut Membre Dernière intervention 24 août 2018 - 20 juin 2018 à 00:11
A voir également:
- Comment Transfer des donnée a un emplacement a un
- We transfer en français - Télécharger - Téléchargement & Transfert
- We transfer gratuit sans inscription - Guide
- Excel reporter des données sur une autre feuille avec conditions - Forum Excel
- Emplacement fichier host - Guide
- Android file transfer mac gratuit - Télécharger - Bureautique
6 réponses
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
Ambassadeur
1 538
10 juin 2018 à 16:18
10 juin 2018 à 16:18
bonjour, as-tu commencé à apprendre le VBA?
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
Ambassadeur
1 538
11 juin 2018 à 22:09
11 juin 2018 à 22:09
je propose ce code, qui s'occupe uniquement de T09:
peux-tu le tester?
Sub luky9() 'T09 AK2 Dim cible As Range Dim ncol As Integer Dim fl As Worksheet Set fl = Sheets("travail") Set cible = fl.Cells(2, "ak") For ncol = 5 To 35 If fl.Cells(11, ncol) = 9 Then cible.Value = fl.Cells(10, ncol) Set cible = cible.Offset(0, 1) End If Next ncol End Sub
peux-tu le tester?
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
12 juin 2018 à 07:39
12 juin 2018 à 07:39
bonjour
super sa marche bien merci tu vas faire la suite
tu es sympas
bien à toi
luky
super sa marche bien merci tu vas faire la suite
tu es sympas
bien à toi
luky
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
1 538
>
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
12 juin 2018 à 08:39
12 juin 2018 à 08:39
je vais faire la suite
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
12 juin 2018 à 18:12
12 juin 2018 à 18:12
bonjour
cool bonne journée et un grand merci
cool bonne journée et un grand merci
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
12 juin 2018 à 19:21
12 juin 2018 à 19:21
j ais vue que si tu enlever les 3 première ligne et tu change les valeur 9 a 10 et tu mais le reste tu c'est tous faire super je teste j ais essayer avec 10 ,9, 8 et sa marche .ces super .
je vais avec le tien si tu a envie de le faire après j ais une autre question merci .tu ma donner la joie
bien à toi
luky
je vais avec le tien si tu a envie de le faire après j ais une autre question merci .tu ma donner la joie
bien à toi
luky
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
1 538
>
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
12 juin 2018 à 19:25
12 juin 2018 à 19:25
voilà:
Sub lukytout() Dim fl As Worksheet Set fl = Sheets("travail") Call luky1(fl, fl.[e2], 10) Call luky1(fl, fl.[e3], 8) Call luky1(fl, fl.[e4], 6) Call luky1(fl, fl.[e5], 4) Call luky1(fl, fl.[e6], 2) Call luky1(fl, fl.[e7], 0) Call luky1(fl, fl.[ak2], 9) Call luky1(fl, fl.[ak3], 7) Call luky1(fl, fl.[ak4], 5) Call luky1(fl, fl.[ak5], 3) Call luky1(fl, fl.[ak6], 1) End Sub Private Sub luky1(feuille As Worksheet, endroit As Range, valeur As Integer) Dim ncol As Integer For ncol = 5 To 35 If feuille.Cells(11, ncol) = valeur Then endroit.Value = feuille.Cells(10, ncol) Set endroit = endroit.Offset(0, 1) End If Next ncol End Sub
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
Ambassadeur
1 538
10 juin 2018 à 18:18
10 juin 2018 à 18:18
pourquoi le 1 va-t-il en E7?
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
10 juin 2018 à 18:25
10 juin 2018 à 18:25
parce-que la ligne 11 E es 0 et ue la ligne 10 il y a 1 alorq il dois aller en E7 car 0 = aT00
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
1 538
>
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
10 juin 2018 à 18:33
10 juin 2018 à 18:33
dans le fichier que tu as envoyé, il y a partout 0 en ligne 11.
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
10 juin 2018 à 19:01
10 juin 2018 à 19:01
voila le fichier
bien a toi luky
https://mon-partage.fr/f/v1CfXAKh/
bien a toi luky
https://mon-partage.fr/f/v1CfXAKh/
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
1 538
10 juin 2018 à 19:46
10 juin 2018 à 19:46
il y a encore partout 0 en ligne 11, sans doute à cause de la fonction nvert.
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
10 juin 2018 à 20:03
10 juin 2018 à 20:03
sur man avec le calcul de couleur des formule
voila la preliere partie
https://mon-partage.fr/f/tmdqblFU/
tu ces faire les deux ??? comme sa tu comprend mieux
voila la preliere partie
https://mon-partage.fr/f/tmdqblFU/
tu ces faire les deux ??? comme sa tu comprend mieux
yg_be
Messages postés
23235
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
30 septembre 2024
1 538
>
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
Modifié le 10 juin 2018 à 21:58
Modifié le 10 juin 2018 à 21:58
maintenant c'est clair, as-tu une idée de comment utiliser vba pour cela?
pourquoi 29 en E2?
pourquoi 29 en E2?
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
10 juin 2018 à 22:11
10 juin 2018 à 22:11
les couleur sa vas mais le problème la ligne 11 es en formule non je ne ces pas
le 29 ces le seul qui a 10 couleur
le 29 ces le seul qui a 10 couleur
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
10 juin 2018 à 23:48
10 juin 2018 à 23:48
ces pour un 10 es un exemple car on fait 9 machine par jour
luky123654
Messages postés
54
Date d'inscription
lundi 1 mai 2017
Statut
Membre
Dernière intervention
24 août 2018
17 juin 2018 à 19:38
17 juin 2018 à 19:38
super j'ais mis dans les case et sas marche bien merci
Modifié le 10 juin 2018 à 17:21
tu croie que si on cest le faire par V B A?
10 juin 2018 à 18:34