Contenu récent par uzu1302

  1. U

    XL 2019 Erreur avec With et copy/paste

    Grand merci Marcel32 c'est bien ce que je voulais !! 👍
  2. U

    XL 2019 Erreur avec With et copy/paste

    Merci Bernard et Marcel32, C'est un peu ça, mais j'explique: Je cherche à mettre la cellule de Date en (B) en (A+1) et supprimer ensuite la ligne (1) et ainsi de suite ! Le code est presque bon !
  3. U

    XL 2019 Erreur avec With et copy/paste

    Le problème c'est que je sais pas comment et où le mettre !!
  4. U

    XL 2019 Erreur avec With et copy/paste

    Bonjour à tous Encore besoin de votre aide. Voici mon code: Sub test() Dim x As Long For x = 1 To 250 Step 3 With Worksheets("Feuil1").Cells(x, "B" & x) .Copy End With Next x Ce que j'essaie de faire : Couper La date qui se trouve en B et la coller en A+1 Ensuite supprimer la ligne...
  5. U

    XL 2019 VBA boucle For / Next

    Encore merci :) la solution : xlig_nbre = Range("K65000").End(xlUp).Row fonctionne comme je voulais cordialement
  6. U

    XL 2019 VBA boucle For / Next

    Merci sylvanu pour les conseils et la réponse. Je vais essayer la solution cordialement
  7. U

    XL 2019 VBA boucle For / Next

    Bonjour à tous, j'ai besoin d'aide car je comprends pas ! Voici mon code : Sub Place() Dim xlig_en_cours As Integer '(Ligne courante) Dim xlig_nbre As Integer '(Nombre de lignes avec les entêtes) Dim xlig_nbre_bis As Integer '(Nombre de lignes sans l'entêtes) Dim xprono As Integer Dim xarrive...
  8. U

    XL 2019 Question sur "ActiveCell.Address"

    Bonjour à tous, J'ai un problème que j'arrive pas à résoudre malgré mes recherches sur le forum ! Dans une variable je stock l'adresse de la cellule de cette façon: CelSelection = ActiveCell.Address soit : "$A$257" après je change de Feuil et je voudrai positionner ma sélection à la même...
  9. U

    XL 2019 Recherche de Doublons sur plusieurs feuilles

    Bonjour, J'utilise cette procédure pour copier les doublons de plusieurs feuilles sur une Feuille "Ancien". Je voudrai faire l'inverse. Que les les lignes uniques sois copiées sur une nouvelle Feuille "News". Sub supDoublons() Set d = CreateObject("Scripting.Dictionary") For s = 1 To...
  10. U

    Remplir 4 listbox

    Re : Remplir 4 listbox Merci pour cette rapide réponse qui correspond tout à fait à mon besoin !! Bon WE
  11. U

    Remplir 4 listbox

    Bonsoir à tous Voilà mon problème: J'ai 4 listbox qui correspondent à 4 jours de la semaine Dans un tableau j'ai les 6 jours de la semaine Lundi Mardi Mercredi Jeudi Vendredi Samedi Dans ma première listbox je choisi un jour : ex mardi Il faut ensuite que dans les 3 autres j'ai les 5...
  12. U

    Excel VBA tri d'un tableau à 3 colonnes

    Bonjour à Toutes et à Tous Voila mon problème: J'ai une feuille avec 1 ligne qui contient : Nom, Sexe, Date de naissance ce pour 3 personnes Je souhaite faire un tri sur la date de naissance avant l'enregistrement en passant par VBA. J'ai trouvé beaucoup de chose mais rien ne marche Si...
  13. U

    Help calcul sur des dates !!

    Re : Help calcul sur des dates !! Merci JC pour ta participation rapide En fait c'est presque ca que je cherche, ce qui me faut c'est le nombre de semaine restante entre la date de naissance et la date dans le future ou il va avoir 12 ou 18 ou 36 mois. Mais en VBA uniquement ! En tout cas...
  14. U

    Help calcul sur des dates !!

    Re : Help calcul sur des dates !! Bonjour à tous Je joins un fichier pour plus de compréhension: Les cellules rouges sont des données que l'on me donne. Les semaines sont calculées en fonction de la date de début (27/11/2012 dans l'exemple) Ce que je n'arrive pas à calculer en VBA c'est les...
  15. U

    Help calcul sur des dates !!

    Re : Help calcul sur des dates !! Merci mais j'ai fais de fichier, seulement des tests !!