× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 une erreur dans ma macroSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
noe2008
  Posté le 24/03/2016 @ 15:54 
Aller en bas de la page 
Petit astucien

salut les amis

j'ai créé une macro mais le code s’arrête dans la valeur par défaut de l'inputbox

cette valeur par defaut est une formule

voila la macro :

Sub Imprimer1()

Dim i As Integer, myValue As Variant

myValue = InputBox("nbre de candidat ", "les candidats", "WorksheetFunction.Count(Sheets("BD").Range("D5:D60"))")

For i = 1 To myValue

Range("Z7").Value = i

ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate _

:=True, IgnorePrintAreas:=False

Next

End Sub

merci les astuciens

Publicité
Titus68
 Posté le 24/03/2016 à 16:30 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour,

Y'a pas les guillemets en trop : "WorksheetFunction.Count(Sheets("BD").Range("D5:D60"))")

Essayer avec WorksheetFunction.Count(Sheets("BD").Range("D5:D60")))



Modifié par Titus68 le 24/03/2016 16:31
noe2008
 Posté le 24/03/2016 à 17:04 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Tu as raison Titus68 ça marche maintenant

Titus68
 Posté le 25/03/2016 à 11:07 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Merci pour le retour.

Juste pour te dire qu'en mettant les " "WorksheetFunction.Count(Sheets("BD").Range("D5:D60"))" était considéré comme une simple chaine de caractères (comme "les candidats" par exemple)

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
89,99 €Assistant vocal Amazon Echo Show 8 avec Alexa à 89,99 €
Valable jusqu'au 10 Août

Amazon fait une promotion sur l'assistant vocal Amazon Echo Show 8 qui passe à 89,99 € (au lieu de 129,99 €). L'appareil piloté par la voix et vos doigts fonctionne avec Alexa, l’intelligence artificielle développée par Amazon. Vous pourez avec elle écouter de la musique, interagir avec vos appareils domotiques, écouter les infos, des livres audio la radio, connaître la météo et d’accéder à des milliers d’autres possibilités grâce aux Skills : recettes de cuisine, petits jeux, etc. Grâce à son écran HD de 8 pouces, vous pourrez également regarder des séries, des films, des photos, afficher des recettes de cuisine, appeler vos amis en visio, contrôler vos caméras de sécurité, etc...


> Voir l'offre
24,99 €Carte Mémoire microSDXC Transcend 300S 64 Go UHS-I U3 A1 à 10,45 €
Valable jusqu'au 10 Août

Amazon fait une promotion sur la carte mémoire microSDXC Transcend 300S 64 Go UHS-I U3 A1 qui passe à 10,45 €. Cette carte mémoire offre des vitesses jusqu'à 95 Mo/s et est parfaite pour les téléphones, caméras et appareils photo HD/4K.


> Voir l'offre
29,99 €Souris gamer Logitech MX518 à 29,99 €
Valable jusqu'au 10 Août

Boulanger solde la nouvelle version Legendary de la souris Logitech MX518 qui passe à 29,99 € alors qu'on la trouve ailleurs à 59,99 €. Cette très bonne souris dédiée aux joueurs dispose d'un capteur optique très précis Hero 16000 DPI, 8 boutons programmables et une mémoire permettant de sauvegardera 5 profils d'utilisation différents. 


> Voir l'offre

Sujets relatifs
sauter erreur dans une macro
Macro introuvable / Erreur de compilation dans le module caché
Erreur dans macro
Enregistrer un fichier au format CSV dans une macro
2 pages par feuille dans macro excel
erreur macro
Creation d' une boucle macro dans fichier EXCEL pour impression
macro afficher masquer lignes tableau dans word 2010
Ecrir par macro dans des cellules différents
[chemin relatif dans une macro]
Plus de sujets relatifs à une erreur dans ma macro
 > Tous les forums > Forum Bureautique