Macro Résolu

Question

Bonjour, 

Je suis débutant sur le monde de programmation, j'ai un problème pour convertir une formule en macro :

=SI(OU(STXT('Active Accounts (all)'!$BX2;6;1)="1";STXT('Active Accounts (all)'!$BX2;6;1)="2");GAUCHE('Active Accounts (all)'!$BX2;12);SI('Active Accounts (all)'!$BM2="";"";

Comment convertir cette formule en macro.

Est-ce que quelqu'un peut m'aider.

Merci d'avance pour votre aide.

ccm81 · Answer

bonjour

en VBA ça devrait ressembler à ça

Dim s As String
With Sheets("Active Accounts (all)")
  s = .Range("BX2")
  If Mid(s, 6, 1) = "1" Or Mid(s, 6, 1) = "2" Then
     Range("TaCellule") = Left(s, 12)
  Else
    If Mid(Range("BM2"), 6, 1) = "" Then
      Range("TaCellule") = ""
    End If
  End If
End With
bonne suite

Macro

1 réponse

Votre réponse

Discussions similaires