[VBA] Access erreur code automation

Bonjour j'ai une erreur dans l'exécution de mon code
Si quelqu'un peut m'aider je le remercie d'avance

    With xls.ActiveSheet.Range("A3,A8,A13,A18,A22,A27,A34,A37").Font
        .name = "Arial"
        .Size = 8
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = 1
    End With
    xls.ActiveSheet.Range("A3,A8,A13,A18,A22,A27,A34,A37").Font.Bold = True
Configuration: Windows XP
Internet Explorer 6.0

3 réponses

  • Votes
  • Date
  • Date décroissante
  1. la premiere ligne
    li me dis une erreur dans l'objet ou l'application pas plus
    1. Modérateur
      Salut,

      si tu commençais par nous dire quelle erreur et sur quelle ligne ?