XL 2013 la fonction Si en VBA

Badie Mohammed · 4 Août 2020

Bonjour,
je suis débutant en VBA.
je voulais créer une nouveau colonne "Export" en Feuille 2 à partir de résultats de la feuille 1.
par exemple : Si dans la feuille 1 la cellule est un nombre , la cellule de de feuille 2 reste vide else export
exemple:
Dpt Export
01
DE Export

vous trouvez le fichier Excel ci joint .

job75 · 4 Août 2020

Bonjour Badie Mohammed,

Voyez le fichier joint et cette macro dans le code de Feuil2 :

VB:

Private Sub Worksheet_Activate()
Application.ScreenUpdating = False
Range("A2:A" & Rows.Count).Clear 'RAZ
With Feuil1.UsedRange
    .Columns(1).Insert xlToRight 'insère une colonne auxiliaire
    .Columns(0) = "=1/ISERROR(-RC[1])"
    On Error Resume Next 'si aucune SpecialCell
    Intersect(.Columns(0).SpecialCells(xlCellTypeFormulas, 1).EntireRow, .Columns(1)).Copy [A2]
    .Columns(0).Delete xlToLeft
End With
End Sub

Elle s'exécute quand on active Feuil2.

A+

Phil69970 · 4 Août 2020

Bonjour Badie Mohammed, le forum

Je te propose ceci

@Phil69970

XL 2013 la fonction Si en VBA

Badie Mohammed

XLDnaute Nouveau

Pièces jointes

job75

XLDnaute Barbatruc

Pièces jointes

Phil69970

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

XL 2013 la fonction Si en VBA

Badie Mohammed

XLDnaute Nouveau

Pièces jointes

job75

XLDnaute Barbatruc

Pièces jointes

Phil69970

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

Privacy & Transparency

Privacy & Transparency