Contenu récent par natha

  1. N

    amelioration de code

    Re : amelioration de code quelque chose comme ca? for x=2 to 300 If shtbase.CheckBox8.Value = True Then shtbase.Range("C"&x+10,"D"&x+10,"E"&x+10,"F"&x+10,"G"&x+10,"H"&x+10,"I"&x+10,"J"&x+10").Copy shtpda.Range("A"&x).PasteSpecial End If next Pour le checkbox je vois pas comment tu...
  2. N

    FONCTION EXCEL (si, ou, et)

    Re : FONCTION EXCEL (si, ou, et) tu te fais une case avec le nombre de jours restants: =A1-AUJOURDHUI() (A1 étant là ou se trouve la date de remise du dossier) Par défaut il te met une date donc tu vas dans format cellule, nombre, et tu choisis standard Puis après comme dit fhoest vas...
  3. N

    test de contenu de cases

    Re : test de contenu de cases Merci pour vos réponses! tototiti: Ok pour la récursivité, j'ai compris le principe. J'ai testé tout comme PJ d'appeler une fonction par elle-même mais en effet ça marche pas ("espace pile insuffisant"). PierreJ : Merci pour ton programme! J'ai testé, c'est...
  4. N

    Champ de page conditionnel

    Re : Champ de page conditionnel Salut clash Pour ma part je ferais un tableau à part avec les différents choix pour "fruits" et pour "légumes". Regarde sur le fichier joint Peut être y a t'il plus simple... Natha
  5. N

    test de contenu de cases

    Bonjour Voila je fais un démineur sous excel mais ça fait quelques jours que je bloque sur un petit truc... Je voudrais que lorsqu'on clique sur une case vide (avec aucune mine autour de la case), toutes les faces vides qui se trouvent à coté soient découvertes et faire la grosse réaction...
  6. N

    Worksheet_SelectionChange

    Re : Worksheet_SelectionChange Yees! Ca fonctionne Du cou pje trouve ca un peu con, j'ai crée une macro avec rien dedans juste pour que ca marche :D enfin merci
  7. N

    Worksheet_SelectionChange

    Bonjour Je suis débutant sur les macros excel, en regardant un peu les sujets j'ai trouvé ceci: Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range('A1')) Is Nothing Then MsgBox 'Click on ' & Target.Address End If End Sub J'ai voulu tester...
  8. N

    creation bouton

    Ok c'est super gégnial merci Robermite (hihi) C'est exactement ce que je voulais...
  9. N

    creation bouton

    Mais si mais si je vous ai tous vu moi!! Seulement je refaisais un message pour mettre mon fichier mais ça a pas marché mais maintenant il est mis c'est bon! Merci a tous les 2!
  10. N

    creation bouton

    ouais mais c'est plus joli avec un beau bouton! :) [file name=rubicub.zip size=11896]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/rubicub.zip[/file]
  11. N

    creation bouton

    ben pourquoi il est pas la mon fichier??? :ohmy:
  12. N

    creation bouton

    J'ai oublié mon super fichier!
  13. N

    creation bouton

    J'ai oublié mon super fichier!
  14. N

    creation bouton

    Bonjour Je suis très débutant dans le domaine... Je voudrais juste faire un bouton tout simple qui permetrait d'actualiser les fonctinons : ma fonction est '=ALEA' (nombre aleatoire) et je voudrais qu'il y ait un nombre aleatoire nouveau à chaque fois que je clique sur le bouton. Merci.
  15. N

    heure et chiffre

    OK merci à tous les 2 ça marche super PS : C'était Nathanaël (d'ou mon surnom : Tata noël) Natha