[macroEx]plage issue d'un résultat de formule
Résolu
76hunter76
Messages postés
4
Date d'inscription
Statut
Membre
Dernière intervention
-
76hunter76 Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
76hunter76 Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
Bonjour a tous, et bonne année
voila j'ai un petit souci avec ma macro Excel.
J'aimerai savoir, si cela est possible, comment faire pour sélectionner plusieurs cellules.
Je m'explique : je suis en A1 est je veux prendre les 43 cellules qui suive (vers le bas). Sachant que le chiffre 43 est peut de changer, car il est issu d'une formule (=NBVAL(A:A))
j'espère avoir était claire et merci d'avance pour vos réponses
cordialement.
voila j'ai un petit souci avec ma macro Excel.
J'aimerai savoir, si cela est possible, comment faire pour sélectionner plusieurs cellules.
Je m'explique : je suis en A1 est je veux prendre les 43 cellules qui suive (vers le bas). Sachant que le chiffre 43 est peut de changer, car il est issu d'une formule (=NBVAL(A:A))
j'espère avoir était claire et merci d'avance pour vos réponses
cordialement.
A voir également:
- [macroEx]plage issue d'un résultat de formule
- Formule si et - Guide
- Formule moyenne excel plusieurs colonnes - Guide
- Resultat foot - Télécharger - Vie quotidienne
- Formule mathématique - Télécharger - Études & Formations
- Formule somme excel colonne - Guide
5 réponses
bonjour
Dim plage As Range, nbre As Integer
nbre = Application.CountA(Columns("A"))
Set plage = Range("A1:A" & nbre)
Merci Michel pour ta réponse, mais je me suis mal exprimé.
En faite, le résultat de la formule (=NBVAL(A:A)) est divisé par 50 (à chaque fois) et c'est ce résultat qui me donne le nombre de cellules à sélectionner.
Exemple : si la formule (=NBVAL(A:A)) me donne 2000, je les divise par 50 ce qui me donne 40 donc je dois sélectionner 40 cellules à partir de A1.
Car c'est pour mettre en place un planning pour un inventaire tournant. Donc j'ai ma liste de stock ( avec le nombre d'articles qui peut changer) et j'aimerai planifié cet inventaire sur 50 semaines. Mais comme il faut qu'il soit automatique (qu'il prenne en compte l'évolution du stock) il faut qu'il puisse prendre toutes les références sur le délai donné.
Est c'est sur ça ou je bloque totalement.
Merci pour vos réponses.
Cordialement.
En faite, le résultat de la formule (=NBVAL(A:A)) est divisé par 50 (à chaque fois) et c'est ce résultat qui me donne le nombre de cellules à sélectionner.
Exemple : si la formule (=NBVAL(A:A)) me donne 2000, je les divise par 50 ce qui me donne 40 donc je dois sélectionner 40 cellules à partir de A1.
Car c'est pour mettre en place un planning pour un inventaire tournant. Donc j'ai ma liste de stock ( avec le nombre d'articles qui peut changer) et j'aimerai planifié cet inventaire sur 50 semaines. Mais comme il faut qu'il soit automatique (qu'il prenne en compte l'évolution du stock) il faut qu'il puisse prendre toutes les références sur le délai donné.
Est c'est sur ça ou je bloque totalement.
Merci pour vos réponses.
Cordialement.
quand tu exprimes une demande, souviens toi que l'on a que ce tu as écris pour essayer d'aider, alors prend ton temps pour être précis et complet
si tu avais demandé une solution, imagine ce que ça te couterait (mini développeur 40€/h)
si tu avais demandé une solution, imagine ce que ça te couterait (mini développeur 40€/h)
Bonjour.
Je n'est pas compris ta réponse, j'ai juste voulu être plus précis dans ce que j'aimerai faire.
Mais merci quand même.
Cordialement.
Je n'est pas compris ta réponse, j'ai juste voulu être plus précis dans ce que j'aimerai faire.
Mais merci quand même.
Cordialement.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
voila j'ai trouvé ce code
Sub Compute_period()
' Compute_period Macro
Sheets("basse de données").Select
Range("D2:D" & Sheets("basse de données").Range("F6").Value).Select
Selection.copy
Sheets("Feuil3").Select
Range("A1").Select
ActiveSheet.Paste Link:=True
Range("B1").Select
End Sub
il me semble bon, il faut juste que je trouve le moyen pour remplacé "F6" par le résultat d'une formule. Car la c'est un chiffre écrit, alors que le chiffre dont j'ai besoin est issu d'une formule.
Si quelqu'un à une idée!!!!
merci d'avance
Cordialement.
Sub Compute_period()
' Compute_period Macro
Sheets("basse de données").Select
Range("D2:D" & Sheets("basse de données").Range("F6").Value).Select
Selection.copy
Sheets("Feuil3").Select
Range("A1").Select
ActiveSheet.Paste Link:=True
Range("B1").Select
End Sub
il me semble bon, il faut juste que je trouve le moyen pour remplacé "F6" par le résultat d'une formule. Car la c'est un chiffre écrit, alors que le chiffre dont j'ai besoin est issu d'une formule.
Si quelqu'un à une idée!!!!
merci d'avance
Cordialement.