Contenu récent par Startus

  1. Startus

    N° semaine d'une année sur l'autre

    Re : N° semaine d'une année sur l'autre Merci beaucoup pour vos nombreuse réponses... Et milles excuses pour la réponse tardive, mais journée bien chargées. J'ai fait quelques petits tests et cela me parait bien, j'analyse plus finement et je reviens merci
  2. Startus

    N° semaine d'une année sur l'autre

    Bonjour à tous et merci pour vos lumières Un petit souci que je n'arrive pas règler... la formule " =ENT(MOD(ENT((D2-2)/7)+0,6;52+5/28))+1" me trouve le numéro de semaine par rapport à une date, jusque là pas de problème... Cette date justement correspond à une date de livraison...
  3. Startus

    Comment.delete ?

    Re : Comment.delete ? Un grand MERCI porcinet82 pour ta réponse rapide et fonctionnelle... Ton code est très bien écrit , rapide en plus Il est intéressant de travailler avec l'objet "Cells" chose que j'utilise très rarement Il va falloir que je me penche dessus... A Bientôt sur le Forum
  4. Startus

    Comment.delete ?

    Re : Comment.delete ? Bonjour porcinet82, le Forum Je te remercie de te pencher sur mon problème... Voilà le fichier :
  5. Startus

    Comment.delete ?

    Bonjour à Tous, Dans un module j'ai écrit un code que ne fonctionne pas comme je le voudrai... Sub Ventiler() Dim c As Range For Each c In Range("A4:A500") If c = True Then c.Resize(1, 15).ClearContents If c = True Then c.Offset(0, 9).Comment.Delete...
  6. Startus

    Double Clic ThisWorkbook

    Re : Double Clic ThisWorkbook Salut Pascal76, Merci la Première question est résolue, c'est Nickel... As-tu une idée pour la deuxième ?
  7. Startus

    Double Clic ThisWorkbook

    Bonjour à tous, 1°) Dans une Application excel je voudrai activer une feuille nommée "Analyse" lors d'un DoubleClic sur une cellule de feuilles différentes En fait la feuille "Analyse" contient un TCD J'ai donc mis dans le code ThisWorkbook : Private Sub...
  8. Startus

    Insérer nom utilisateur à l'impression

    Re : Insérer nom utilisateur à l'impression Salut à tous, Tu mets dans le code de ton bouton : Private Sub CommandButton1_Click() ActiveSheet.PrintOut PageSetup.RightFooter = Application.UserName End Sub Et ensuite tu mets dans ThisWorkbook : Private Sub...
  9. Startus

    Format N° Tel Spéciaux

    Re : Format N° Tel Spéciaux Re, Merci pour ces explications...
  10. Startus

    Format N° Tel Spéciaux

    Re : Format N° Tel Spéciaux De nouveau moi, Quelqu'un pourrait-il m'expliquer ces formats ? [<=799999999]0#" "##" "##" "##" "##;[>799999999]0 ### " "### " "### ou [>819000000]0#" "###" "###" "###;0#" "##" "##" "##" "## Merci
  11. Startus

    Format N° Tel Spéciaux

    Re : Format N° Tel Spéciaux Salut à tous, Merci beaucoup pour toutes ces réponses rapides... Tout marche Nickel.
  12. Startus

    Format N° Tel Spéciaux

    Bonjour le forum, Dans une cellule j'ai une formule (=INDEX...) qui me renvoie un N° de Tel. Ce N° est standard ("## ## ## ## ##"), mais il arrive que ce N° est spécial ("0 820 ### ###"). Je voudrait que la cellule adopte le bon format en fonction du N° renvoyé... J'ai essayé avec ceci ...
  13. Startus

    Liens Hypertexte qui ne répond pas ?

    Re : Liens Hypertexte qui ne répond pas ? Bonjour et BON REVEILLON, Merci de ta réponse rapide Michel et surtout très bonne... En fait dans la feuille de données j'écrivai les liens sans "http://" MERCI
  14. Startus

    Liens Hypertexte qui ne répond pas ?

    Bonsoir à tous, Dans une feuille de calcul j'ai créee une formule : LIEN_HYPERTEXTE(INDEX(Site_Web;EQUIV(Nom_Contact;Contact;0))) La formule va récupérer dans une feuille de donnée la requête qui me l'affiche sous la forme standard d'une adresse Web "www.test.fr" Malheureusement le...
  15. Startus

    Comment utiliser MouseMove

    Re : Comment utiliser MouseMove Bonsoir à tous, Alors-là chapeau Bricofire du feu... Je ne savais pas que l'on pouvais changer le pointeur de souris comme ça Merci beaucoup, cette idée me plait bien. C'est moins lourd Plus rapide Et pas de code Mais dis-moi comment fais-tu ...