Macro de Date Echeance

Fermé

nonossov Messages postés 611 Date d'inscription lundi 29 décembre 2014 Statut Membre Dernière intervention 17 janvier 2020 - 24 janv. 2019 à 15:57
nonossov Messages postés 611 Date d'inscription lundi 29 décembre 2014 Statut Membre Dernière intervention 17 janvier 2020 - 25 janv. 2019 à 17:14

Bonjour,

merci de m'aider a trouver la bonne macro de cette situation:

J'ai deux feuilles: Feuil1, Feuil 2

Feuil1 dans colonne A , j'ai des dates, format: JJ/MM/AAAA.
Feuil2 dans colonnes C, j'ai des chiffres: exemple: 30, 28, 15.,,,,

j'ai besoin de ajouter les chiffres dans la Feuil2 à les dates dans la Feuil1, et coller le resultat dans la colonne "i" de la Feuil1.

Exemple:

Feuil1/colonne A = 31/01/2019
Feuil2/colonne C = 20

le resultat collé dans la colonne 'I' Feuil1 = 20/02/2019

NB: si la colonne C de la Feuil 2 est vide = resultat dans colonne "I" Feuil1 est vide.

La macro applique a toutes les colonnes.

Merci infiniment mes amis

Configuration: Windows / Firefox 52.0

A voir également:

Macro de Date Echeance
Macro word - Guide
Macro logiciel - Télécharger - Organisation
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Macro recorder - Télécharger - Confidentialité
Trouver une date de naissance gratuit - Forum Webmastering

1 réponse

Réponse 1 / 1

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
24 janv. 2019 à 18:30

Bonjour,

Vous voulez vraiment une macro, car une simple formule va tres bien!!!

nonossov Messages postés 611 Date d'inscription lundi 29 décembre 2014 Statut Membre Dernière intervention 17 janvier 2020
25 janv. 2019 à 12:10

c mieux une macro, car j'ai toutes les colonnes pleines des informations, je voudrerai que ça soit automatique.

Merci infiniment

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
25 janv. 2019 à 12:13

Bonjour,

Pouvez expliquer:
La macro applique a toutes les colonnes.
Alors que vous parlez d'une seule!!!!

nonossov Messages postés 611 Date d'inscription lundi 29 décembre 2014 Statut Membre Dernière intervention 17 janvier 2020
Modifié le 25 janv. 2019 à 12:31

je vise 2 colonnes: colonne A, et colonne C, de deux feuilles.

Merci

nonossov Messages postés 611 Date d'inscription lundi 29 décembre 2014 Statut Membre Dernière intervention 17 janvier 2020
25 janv. 2019 à 16:05

J'au voulu dire la macro s'applique sur les deux colonnes A , et C.

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
25 janv. 2019 à 16:34

Re,

une facon de faire:

Sub calcul_Date()
    Dim sh1 As Worksheet
    Dim sh2 As Worksheet
    Dim Plage As Range
    
    Set sh1 = Worksheets("feuil1")
    Set sh2 = Worksheets("feuil2")
    With sh1
        Set Plage = .Range("A1:A" & .Range("A" & .Rows.Count).End(xlUp).Row)
        For Each cel In Plage
            If IsDate(cel) And sh2.Cells(cel.Row, 3) <> "" Then
                .Cells(cel.Row, 9) = cel + sh2.Cells(cel.Row, 3)
            Else
                .Cells(cel.Row, 9) = ""
            End If
        Next
    End With
End Sub

Discussions similaires

Prélèvement JM Jacquie et Michel date.

Problème Whatsapp - "La date est incorrecte"

Pix

Publipostage date en anglais : comment l'inverser ?

Problème publipostage date de naissance

Discussions similaires

Newsletters