Discussion :

[Sherman750]

Bonjour à tous ma situation est assez simple mais je ne sais pas comment la solutionner.

Ma macro copie une cellule puis colle la valeur seulement de la cellule dans une autre.(facile)

Je voudrais soustraire la valeur d'une cellule spécifique à ma cellule copier avant de coller le résultat.

Il s'agit de cellule en format date et heure. Dans le fond je soustrait des heures à une date. Si c'est impossible de pourrais toujours modifier le format de mes cellules sans problème et je changerais le code.

Voici une partie de mon code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Set Ws_Planif = Sheets("Planificateur")
Set Ws_Scie = Sheets("Scie")
 
    If Ws_Planif.Cells(3, 11).Value <> 0 Then
        With Ws_Scie
            DerLigG = .Range("G" & .Rows.Count).End(xlUp).Offset(1, -6).Row
            .Cells(DerLigG, 1).Copy
            Ws_Planif.Cells(6, 4).PasteSpecial Paste:=xlPasteValues
        End With
 
    End If
 
End Sub

Merci de l'aide!!!

[SfJ5Rpw8]

Bonsoir,

cela doit être plus simple de faire ta soustraction après avoir effectué ton "collage"

[Sherman750]

J'ai oublié de mettre des précisions dans mon premier post.

Je voudrais que la soustraction tienne compte des jours ouvrés.

Voici ce que j'ai écrit comme code mais ça ne fonctionne pas du tout:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    Active.cell(networkdays(active.cells.value;-cells(17,12)/8;range(joursfériés))

Des suggestions...