Bonjour à toutes et tous
voila, j'ai un problème avec ma base de données.
(sous excel 97)
Une fois définie, ma base est correcte B12:P248
(voir code joint), mais quand je suis dans la
feuille "dossiers" et que
je fais Edition...atteindre...base_de_données????
la plage selectionnée s'obstine à être: D23:R260
je n'arrive pas à trouver pourquoi.
est ce que quelqu'un ou quelqu'une aurait une
idée lumineuse à ce sujet ????
======================================
Sheets("dossiers").Activate
Call ouvert 'deverouille le mdp
Application.DisplayAlerts = False
bd = Range("definir").Value 'donne la valeur
d'une cellule nommée qui defini ma zone de base
de données B12:P500 et qui
'évolue en fonction des saisies
bd = "=" + bd
Range(bd).Select 'selection de ma base OK
' ligne suivante j'ai
essayé aussi avec ="database" j'ai même pris le
temps de supprimer le nom avant de tester
ActiveWorkbook.Names.Add
Name:="base_de_données", RefersTo:=bd
Range("B12:P65536").Select '
nomme mes entêtes de colonnes par le nom qu'elles
contiennent
Selection.CreateNames Top:=True, Left:=False,
Bottom:=False, Right:= _
False
Application.DisplayAlerts = True
Range("c12").Select
Sheets("accueil").Activate
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Hervé
Salut Michek, Es tu allé voir dans : Insertion|Nom|Définir... pour voir si ta base s'y trouve et quel est sa référence de plage ? Hervé.
"Michel" a écrit dans le message news:
Bonjour à toutes et tous voila, j'ai un problème avec ma base de données. (sous excel 97) Une fois définie, ma base est correcte B12:P248 (voir code joint), mais quand je suis dans la feuille "dossiers" et que je fais Edition...atteindre...base_de_données???? la plage selectionnée s'obstine à être: D23:R260 je n'arrive pas à trouver pourquoi. est ce que quelqu'un ou quelqu'une aurait une idée lumineuse à ce sujet ????
===================================== > Sheets("dossiers").Activate Call ouvert 'deverouille le mdp Application.DisplayAlerts = False bd = Range("definir").Value 'donne la valeur d'une cellule nommée qui defini ma zone de base de données B12:P500 et qui 'évolue en fonction des saisies bd = "=" + bd Range(bd).Select 'selection de ma base OK ' ligne suivante j'ai essayé aussi avec ="database" j'ai même pris le temps de supprimer le nom avant de tester ActiveWorkbook.Names.Add Name:="base_de_données", RefersTo:½ Range("B12:P65536").Select ' nomme mes entêtes de colonnes par le nom qu'elles contiennent Selection.CreateNames Top:=True, Left:úlse, Bottom:úlse, Right:= _ False Application.DisplayAlerts = True Range("c12").Select Sheets("accueil").Activate End Sub
-- Amicalement Michel . P
Salut Michek,
Es tu allé voir dans : Insertion|Nom|Définir... pour voir si ta base s'y
trouve et quel est sa référence de plage ?
Hervé.
"Michel" <prive.ma-boite_sans_spam@laposte.net> a écrit dans le message
news: mn.dc2c7d4637df0937.11921@laposte.net...
Bonjour à toutes et tous
voila, j'ai un problème avec ma base de données.
(sous excel 97)
Une fois définie, ma base est correcte B12:P248
(voir code joint), mais quand je suis dans la
feuille "dossiers" et que
je fais Edition...atteindre...base_de_données????
la plage selectionnée s'obstine à être: D23:R260
je n'arrive pas à trouver pourquoi.
est ce que quelqu'un ou quelqu'une aurait une
idée lumineuse à ce sujet ????
===================================== > Sheets("dossiers").Activate
Call ouvert 'deverouille le mdp
Application.DisplayAlerts = False
bd = Range("definir").Value 'donne la valeur
d'une cellule nommée qui defini ma zone de base
de données B12:P500 et qui
'évolue en fonction des saisies
bd = "=" + bd
Range(bd).Select 'selection de ma base OK
' ligne suivante j'ai
essayé aussi avec ="database" j'ai même pris le
temps de supprimer le nom avant de tester
ActiveWorkbook.Names.Add
Name:="base_de_données", RefersTo:½
Range("B12:P65536").Select '
nomme mes entêtes de colonnes par le nom qu'elles
contiennent
Selection.CreateNames Top:=True, Left:úlse,
Bottom:úlse, Right:= _
False
Application.DisplayAlerts = True
Range("c12").Select
Sheets("accueil").Activate
End Sub
Salut Michek, Es tu allé voir dans : Insertion|Nom|Définir... pour voir si ta base s'y trouve et quel est sa référence de plage ? Hervé.
"Michel" a écrit dans le message news:
Bonjour à toutes et tous voila, j'ai un problème avec ma base de données. (sous excel 97) Une fois définie, ma base est correcte B12:P248 (voir code joint), mais quand je suis dans la feuille "dossiers" et que je fais Edition...atteindre...base_de_données???? la plage selectionnée s'obstine à être: D23:R260 je n'arrive pas à trouver pourquoi. est ce que quelqu'un ou quelqu'une aurait une idée lumineuse à ce sujet ????
===================================== > Sheets("dossiers").Activate Call ouvert 'deverouille le mdp Application.DisplayAlerts = False bd = Range("definir").Value 'donne la valeur d'une cellule nommée qui defini ma zone de base de données B12:P500 et qui 'évolue en fonction des saisies bd = "=" + bd Range(bd).Select 'selection de ma base OK ' ligne suivante j'ai essayé aussi avec ="database" j'ai même pris le temps de supprimer le nom avant de tester ActiveWorkbook.Names.Add Name:="base_de_données", RefersTo:½ Range("B12:P65536").Select ' nomme mes entêtes de colonnes par le nom qu'elles contiennent Selection.CreateNames Top:=True, Left:úlse, Bottom:úlse, Right:= _ False Application.DisplayAlerts = True Range("c12").Select Sheets("accueil").Activate End Sub
