Résultats de la recherche

  1. Atiom

    XL pour MAC Mise à jour automatique d'une liste

    Bonjour, Nous avons un tableau ( que peux contenir environ 1500 lignes ) remplie avec de liste de validation qui sont alimentée par une base de données dans une autre feuille. La question est : Existe-t-il un moyen de mettre à jour le tableau, lorsque nous changeons une donnée dans la base ...
  2. Atiom

    XL 2010 2 éme ligne vide depuis la fin

    Bonjour, Je souhaite obtenir une macro qu’efface le contenu entre la première et la deuxième ligne vide d’une colonne à l’envers. En gros en commençant depuis la fin, il faut déterminer une plage comprise entre la première et la deuxième ligne vide d’une colonne (Ligne CE par exemple ) et...
  3. Atiom

    Worksheet_Change et liste déroulante

    Bonjour, Lorsque la feuille change ( Worksheet_Change(ByVal Target As Range) Je souhaiterait obtenir une macro afin d'pouvoir afficher ( ou extraite ) les valeurs du tableau ( A4:BB2000), selon le valeur de la liste en A2 ( sans doublons )). Après beaucoup de recherches sur le net je constate...
  4. Atiom

    XL 2010 Compte total de semaines

    Bonjour, Sans vouloir compliquer et en partant du principe que les années on tous 52 semaines ! En VBA comment peut-on obtenir le total de semaines ? Arrivée <> TextBox1 = 5 Départ <> > TextBox2 = 20 Total semaine <> TextBox3 = 15 (TextBox2 - TextBox1) Pas de problème si le départ est...
  5. Atiom

    Mise à jour automatique d'un tableau

    Bonjour le forum, Je souhaiterais mettre à jour automatiquement un tableau d’une manière particulière. Ci-joint un petit fichier pour une meilleure compréhension. Merci de votre aide.
  6. Atiom

    Division par Zero ERREUR

    Bonjour, J’ai un petit problème avec une division. Avec les deux méthodes ci-dessous il y a toujours l’erreur à la saisie des TextBox21 ou TextBox46 ! Est-ce que nous pouvons modifier avec Sng ,CDbl ,CDec ,CInt ,CLng ? Mais comment ? Est-ce quelqu'un peux me donner un petit coup de main...
  7. Atiom

    Recherche avec en-têtes différents

    Bonjour, Je cherche le moyen par macro de faire une recherche particulière, car les en-têtes des colonnes ne sont pas les mêmes et se trouvent dans des feuils différentes. Ci-joint le fichier pour une meilleure compréhension Est-ce quelqu'un peux me donner un petit coup de main svp. Merci de...
  8. Atiom

    Espace concatener

    Bonjour, Dans ce petit but de code les mots restent collés. Comment je peux modifier le code pour les séparer ? Merci de votre aide. Sub CONCATINERR() Dim i As Long With Sheets("Annuelles") i = .Range("A" & Rows.Count).End(xlUp).Row For i = 2 To i .Cells(i, 1) = .Cells(i, 50) & .Cells(i, 2) &...
  9. Atiom

    XL 2016 Form Recherche Modif Ajout Sup Atiom

    Bonjour, J’ai récupéré une petite application de Jacques Boisgontier ci-joint et que je remercie au passage et je souhaiterais apporter une petite modification. Pour ajouter des nouvelles fiches le bouton ajouter commence pour tout effacer. Afin de gagner du temps (Bénéficier de certains...
  10. Atiom

    ComboBox et If

    Bonsoir, Est-ce que quelqu'un peux me donner un petit coup de main avec ce petit but de code if dans plusieurs Combobox. Après plusieurs essais je bug toujours et n'arrive pas à trouver la solution. Merci d'avance et bonne soirée.
  11. Atiom

    Afficher les valeurs dans une UserForm sous condtions

    Bonsoir le forum, Je souhaiterai afficher les valeurs d’une colonne dans un TexBox en fonction des valeurs variables affichés dans une cellule. Mais au même temps rendre l’Userform automatique ( Ouvrir et fermer selon les valeurs ). Ci-joint un petit fichier! Merci d’avance pour votre aide.
  12. Atiom

    UserForm et image Gif

    Bonjour le forum, Lorsque on lance une UserForm ( avec une image gif à l’intérieur ) par un bouton est-t-il possible que à chaque clique l’image puisse changer ? Exemple : 1 Clique – Affiche Image Gif 1 Fermeture de UserForm 2 Clique – Affiche Image Gif 2 Fermeture de UserForm 3 Clique –...
  13. Atiom

    XL 2016 Tombola

    Bonsoir, J’ai récupéré le fichier ci joint il fonctionne parfaitement à la condition de réinitialiser chaque fois le tirage. Apres enregistrement je souhaiterai pouvoir reprendre le tirage à la même place. Est-ce que quelqu’un peut me donner un petit coup de main et modifier le code. Merci...
  14. Atiom

    VBA - Compte mots et caractères

    Bonsoir le forum, Je recherche à faire la macro suivante: Dans une phrase si la cellule contient plus que 40 caractères alors passé les 2 derniers mots dans la colonne suivante. Ci-joint un fichier comme exemple pour une meilleure compréhension. Merci de votre aide.
  15. Atiom

    Formule tirer vers le bas et décaleler de 10

    Bonsoir, En A2 j'ai la formule ci-dessous =SI(Configuration!B10="";"";SI(Configuration!B10=$V$1;"";Configuration!B10)) Je souhaiterais obtenir en A3 =SI(Configuration!B20="";"";SI(Configuration!B20=$V$1;"";Configuration!B20)) Et A4...
  16. Atiom

    ComboBox .AddItem valeur cellule sans doublons

    Bonjour, UserForm Private Sub UserForm_Initialize() With ComboBox1 .AddItem "Pos 1" .AddItem "Pos 2" .AddItem "Pos 3" End With End Sub ComboBox Private Sub ComboBox1_Change() If ComboBox1.Value = "Pos 1" Then masque_lignes_2_4 If ComboBox1.Value = "Pos 2" Then...
  17. Atiom

    Combobox ordre alphabétique

    Bonsoir le forum, Le code ci-dessous récupère les données sans doublons mais ne les affiche pas par l’ordre alphabétique. Ets-ce que quelqu’un peu m’aider à le compléter svp ? Merci d’avance . Dim Cell As Range 'Supprime les données existantes dans le ComboBox...
  18. Atiom

    Somme semaines

    Bonjour le forum Quelle est la meilleure manière de faire la somme des semaines. Exemple : A1=50 B1=4 C1= somme A1+B1 ( 54 ) Mais comme l’année compte que 52 semaines je souhaite en obtenir en C1 la valeur 2 Je pensais que le tour été joué avec la fonction NO.SEMAINE, mais...
  19. Atiom

    Formule 3 conditions

    Bonjour le forum J’ai besoin d’un petit coup de main pour une formule (3 conditions) à tirer vers le bas. à afficher un P4 =SI(B4="dimanche";D4 ou alors si B4 = "samedi" et F4 >20 ;F4 ou alors afficher 0 quelque chose comme ci-dessous =SI(B4="dimanche";D4 ;si(B4 = "samedi" et F4...
  20. Atiom

    Bordures dans une cellule en fonction de la couleur de remplissage.

    Bonjour, Ça fait un moment que je cherche dans le forum et je ne trouve pas, je suppose que le sujet a déjà été discuter, mais désolé je ne le retrouve pas. Je cherche tout simplement ( en VBA ou MFC ) dans une plage par exemple (B5:F20) à mettre les bordures seulement au cellules que...