Excel vb

Fermé
noobduvb - 27 mai 2008 à 14:05
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 27 mai 2008 à 16:05
Bonjour,
je suis en train de créer une macro!
un traitement ligne par ligne d'une sortie de base de donnée extraite sur excel
arrivée à une cellule je voudrais mettre les 2 premier caractére dans une variable pour faire une recherche de ces 2 caractére ex dans ma cellule j'ai HT\8797899

je voudrais récupéré la valeur HT

je pensée pour le faire avec :

For I = 9 To compteur + 8
' par ligne


resultat = Worksheets("Feuil1").Left(Cells(I, 11).Value, 2)

je connais la formule avec split mais elle ma l'air compliqué
A voir également:

12 réponses

Réponse 1 / 12
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
27 mai 2008 à 14:08
bonjour,

et la question est ?

;o)
0
Réponse 2 / 12
zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 161
27 mai 2008 à 14:10
salut

cela me parrait bien. Quel est ton probleme?
0
Réponse 3 / 12
noobduvb
27 mai 2008 à 14:14
oui dsl :)

ma formule
resultat = Worksheets("Feuil1").Left(Cells(I, 11).Value, 2)

n'est pas traité par VB, il me sort une erreur...

:(

je suppose que c'est un simple probleme de syntaxe
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
27 mai 2008 à 14:20
quelle erreur est générée ?
0
Réponse 4 / 12
zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 161
27 mai 2008 à 14:16
comme tu n'as pas mis le code complet de ta macro. Difficile de dire.

Ne serait-ca pas plutot la fin de boucle qui manque (Next)?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 12
noobduvb
27 mai 2008 à 14:21
zavenger

ma macro est assez longue à vrais dire, nonje nest pas oublié de next

quand je mes ma formule en commentraire tout tourne correctement...

et de que je la remet,il trouve une erreur et se remet en debogage sur cette formule


merci
0
Réponse 6 / 12
noobduvb
27 mai 2008 à 14:24
l'erreur généré est :
erreur d'exécution 438
proprété ou methode non générée par cet objet

encore merci de vouloir m'aidé
0
Réponse 7 / 12
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
27 mai 2008 à 14:27
ok alors fais :

resultat = Worksheets("Feuil1").Cells(I, 11).Value
resultat = Left(resultat, 2)

;o)
0
zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012 161
27 mai 2008 à 14:51
juste pour le fun, la reponse est :

resultat = Left(Worksheets("Feuil1").Cells(I, 11).Value, 2)
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204 > zavenger Messages postés 811 Date d'inscription vendredi 29 février 2008 Statut Membre Dernière intervention 20 avril 2012
27 mai 2008 à 14:58
oui aussi :O))
0
Réponse 8 / 12
noobduvb
27 mai 2008 à 14:34
oui en effet sa fonctionne :))
pdt que je vous ai comme précieuse aide

j'ai 2 date

date de début date de fin
27/05/2008 15/07/2008

je voudrais savori si il est possible toujours en Vb de connaitre le nombre de jours ouvré
entre ces 2 date

merci polux
0
Réponse 9 / 12
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
27 mai 2008 à 14:47
je crois qu'il y a la fonction DateDiff("d", date1,date2) qui retourne le nombre de jour entre les 2 dates.
En double cliquant sur datediff puis en faisant F1, on doit avoir l'aide en ligne concernant cette fonction. Je ne suis pas très sur de ("d") pour le jour.
Il doit aussi y avoir un paramètre pour les jours ouvrés.

;o)

polux
0
Réponse 10 / 12
noobduvb
27 mai 2008 à 15:01
oui je vois je vais faire des petits tests, et voir si je trouve plus sur cette fonction
ce qui m'embéte ce sont les jours ouvrés :s

merci
0
Réponse 11 / 12
noobduvb
27 mai 2008 à 15:56
j'ai trouvé une aide plutot sympa

https://support.microsoft.com/fr-fr/help/466831

avec un petit peus de mal à comprendre
mais si quelqu'un trouve mieu je suis là :p
0
Réponse 12 / 12
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
27 mai 2008 à 16:05
Le principe est sympa sauf qu'il faut déclarer un tableau contenant les jours fériés de l'année contenant les deux dates à tester.

Il est vrai que sans connaissance du langage VB c'est un peu rébarbatif. Mais tu devrais pourvoir l'adapter à ton besoin.

Si tu as des problèmes, fais moi signe.

;o)
0