Excel 2003 - Date

Bonjour,

Je suis bloqué par quelque chose de très probablement simple pour vous mais néanmoins insolvable pour moi....

J'ai dans la case A1 "01/10/2014", dans la case B1 "14"

Comment puis je faire pour que dans C1 soit écrit "14/10/2014" ?

Merci à vous tous !

Vrancky

Résolu!

Bonjour,

A tester en C1 :

=DATE(ANNEE(A1);MOIS(A1);B1)

Ca marche, je pensais sulutionner mon problème de cette façon mais je n'y arrive toujours pas.

Prenons comme exemple le fichier joint (je ne peux pas mettre le fichier en totalité, trop volumineux).

La première ligne correspond au mois/année. La seconde au numéro de semaine. La troisième au premier jour ouvré de la dite semaine.

Si je place mon curseur en M8, je souhaite aller écrire en A22 "13/03/2012".

Merci pour votre aide,

Vrancky

10datestage.zip (7.92 Ko)

Bonjour,

A tester

ALT F11 pour ouvrir l'éditeur VBE - Voir module dans Feuil1 (Feuil1).

Sélectionne une cellule du tableau...

A te relire

Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim numCol As Integer, _
    numSem As Byte, _
    annee As Integer, _
    derLig As Long, derCol As Integer, rng As Range

    derCol = Cells(2, Columns.Count).End(xlToLeft).Column
    derLig = Cells(Rows.Count, 1).End(xlUp).Row
    Set rng = Range(Cells(4, 2), Cells(derLig, derCol))

    If Not Application.Intersect(rng, Target) Is Nothing Then

        If Target.Count > 1 Then Exit Sub

        numCol = Target.Column

        Select Case numCol
            Case Is <= 54
                annee = 2012
            Case Is <= 105
                annee = 2013
            Case Else
                annee = 2014    ' à adapter
        End Select

        numSem = Cells(2, numCol)
        MsgBox Lundi(Cells(2, numCol), annee), 64

    End If

    Set rng = Nothing

End Sub
8datestage.zip (16.02 Ko)

Ca me renvoie Target comme non définie....

Je vais m'ouvrir les veines

Re,

On parle de mon fichier, ou de ton vrai fichier?

Cdlt.

Du mien, du mien malheureusement...

Je n'arrive pas à faire ressortir ce que je souhaite.

une fois la date "recomposée" je souhaite aller l'écrire dans une ccellule d'une autre feuille

PS: je t'ai envoyé un email sur la boite liée à ton compte ici

Re,

Message reçu.

Je t'ai communiqué mon adresse.

Cdlt.

Rechercher des sujets similaires à "2003 date"