Noms definis des plages bdd

[xhudi69]

Bonsoir à toutes et à tous

dans une base de données je travaille avec les titres de colonnes comme suit:
Formules>créer à partir de la sélection>ligne du haut>OK
en VBA cela donne:

Sub Macro22()
Sheets("QUARTIERS").Select
Range("A1:VDX500").Select
Selection.CreateNames Top:=True, Left:=False, Bottom:=False, Right:= _
False
Range("E18").Select
End Sub

ces lignes sont ajoutées en fin de la macro générale
une fois entré mes données via le formulaire et après avoir appuyé sur le bouton afin de ranger celles-ci, tout ce passe bien.
MAIS ! à la seconde saisie de données EXCEL me demande "Voulez vous remplacer la sélection existante...."
lorsque l'on a quelques colonnes à gérer, ça vat mais dans mon cas j'ai 15000 colonnes😛.
comment faire en rajoutant un morceaux de code pour dire à EXCEL que de toutes les manières c'est oui pour tout?

j'ai aussi essayé l'exellent tuto de EXCEL LABO Ce lien n'existe plus mais je n'arrive pas à avoir mes colonnes nomées, c'est important pour moi sur d'autres feuilles au niveaux recherches.
merci à tous.

 

[xhudi69]

Re : Noms definis des plages bdd

RE

je viens de trouver la réponse et ça marche


Sub Macro22()
Sheets("QUARTIERS").Select
Range("A1:H50").Select
Selection.CreateNames Top:=True, Left:=False, Bottom:=False, Right:= _
False
Range("E18").Select
Exit Sub
End Sub

bonsoir à tous.