VB-Condidtion sur la date d'ouverture de fichier

[TheProdigy]

Bonjour,

Je voudrais savoir comment programmer qu'à l'ouverture du fichier de vérifier si la date d'ouverture est supérieur à une date donnée (31/12/2007) à 00h00 et donc il va falloir supprimer la feuil2

Merci

 

[fred65200]

Re : VB-Condidtion sur la date d'ouverture de fichier

bonjour

peut être avec

Private Sub Workbook_Open()
Application.AskToUpdateLinks = False
'...
'...

Cordialement

 

[TheProdigy]

Re : VB-Condidtion sur la date d'ouverture de fichier

ça n'a pas marché mais bon🙁 on y peut rien

Par contre j'ai une question
Fred, ta solution s'avere plus pratique que celle proposée par Jeanpierre

For N = 1 To 37
    Sheets("repmada").Range("V" & N) = Sheets("repmada").Range("W" & N)
    Sheets("repmada").Range("X" & N) = Sheets("repmada").Range("Y" & N)
    Sheets("repmca").Range("V" & N) = Sheets("repmca").Range("W" & N)
    Sheets("repmca").Range("X" & N) = Sheets("repmca").Range("Y" & N)
  Next N

  '' solution plus rapide que la boucle
  'Dim tablo1 As Variant
  ''remplissage du tableau avec les valeurs de la plage ...
  'tablo1 = [repmada!W1:W37]
  ''remplissage de la plage avec les valeurs du tableau
  '[repmada!V1:V37] = tablo1
  'tablo1 = [repmada!Y1:Y37]: [repmada!X1:X37] = tablo1
  'tablo1 = [repmca!W1:W37]: [repmca!V1:V37] = tablo1
  'tablo1 = [repmca!Y1:Y37]: [repmca!X1:X37] = tablo1

Je l'ai testée elle est plus pratique je gagne bcp en terme de secondes.
Peux-tu m'expliquer pourquoi et comment s'appelle ce code ou cette procédure que t'as créé?

 

[fred65200]

Re : VB-Condidtion sur la date d'ouverture de fichier

bonjour

tu m'excuseras, mais je n'ai pas compris ta question.

J'utilise un tableau, regarde dans l'aire "Array" (touche F1)

Cordialement