Aide pour macros

Question

Je vous solicite ce soir afin de demander votre aide...


En effet je dois rendre pour vendredi un dossier d'informatique sur des macros Visual Basic.


J'ai deux macros que je n'arrive pas à faire.Si vous pouvez m'aider ca me sauve la vie.

Voici la première:


1.Créez une macro permettant de créer dans un classeur, une feuille par
jour pour un mois et une année donnée(saisie par l'utilisateur par le
biais d'un inputbox).Utilisez la fonction Dateserial().

Voici la deuxième:

2.Concevoir une macro permettant de supprimer les feuilles pour
lesquelles la date saisie dans la cellule B1 est inférieure à une date
saisie par l'utilisateur(saisie par le biais d'un inputbox).

Voila.Si vous pouvez m'aider c'est vraiment GENIAL car la j'y
arrive vraiment pas et j'aiu pas mal de boulot à coté en ce moment.


Merci beaucoup.

leSaleGauSS · Answer

Dis pourquoi tu postes deux fois ton topic ?http://www.vbfrance.com/infomsg_AIDE-MACROS_862013.aspx

Quand je suis là tout va mal

leSaleGauSS · Answer

Quand je suis là tout va mal

ziderdan34 · Answer

désolé mais j'ai pas bien saisi comment marche ce forum...
ca se reproduira plus!!!

leSaleGauSS · Answer

Pas mal 0 seconde d'intervalle !! C'est  786090  Drikce06 qui va être content
Sinon =938384 ziderdan34 pense à mettre le bout de code qui bloque. Montre nous que tu as travaillé et nous t'aiderons

Quand je suis là tout va mal

ziderdan34 · Answer

Pour la première macro j'avais le debut de code suivant

Sub exercice( )
Dim date_1 as date
dim jour as integer
dim mois as integer
dim annee as integer

mois =inputbox ("Entrez le mois")
annee=inputbox ("Entrez l'annee")

compteur =0

for compteur = 1 to 31
whorksheet.add
wrorksheet.name=dateserial(compteur,mois,annee)
Next

End sub

drikce06 · Answer

Salut! leSaleGauSS Mdr! Reccord battu et inégalable!

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

drikce06 · Answer

Ou tu tiens compte des mois à 28 ou 29 et 30 jours?

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

drikce06 · Answer

Et ce que tu as fais ça marche ou pas? Tu as une erreur? Si oui laquelle?

 Drikce 06

Si la réponse vous convient: Réponse acceptée. Si la réponse vous convient pas:

cavo789 · Answer

for compteur =  1 to 31
 whorksheet .add
wrorksheet.name =dateserial(compteur,mois,annee)
Next

Le nom de l'objet, c'est WorkSheet  

Christophe

Aide pour macros

9 réponses

Votre réponse

Discussions similaires