J'ai une macro qui positionne sur une base de Donn=E9es
Quelle est l'instruction suivante pour faire apparaitre=20
le masque de saisie "Donn=E9es Grille"
Est-il possible de formater le masque de saisie ( taile=20
de chaque zone , controler les donn=E9es entr=E9es libell=E9 ou=20
valeur ect )
Bonsour ®, en effet la solution de Jacky est la bonne .... explications ??? succintes hum... ;-)) bien que la valeur interne des dates saisies (jour=partie entiere,heure=partie décimale) lorsque l'on utilise la feuille de calcul et les menus le format des dates affichées dans la grille respectent le "format Local"
Lorsque que l'on active la grille via VBA le format des dates affichées est le format standard VBA (anglais !!!)
pour s'en convaincre: 3 approches possibles avec une plage contenant des dates Sub Appels_Grille() 'creation plage de données [A1] = "Date" [B1] = "quantité" [C1] = "blabla" [A2:C15] = ["=ROW()*5000 * Rand()"] [A2:C15].Value = [A2:C15].Value [A:A].NumberFormat = "dd/mm/yyyy hh:mm" '---------------- Range("A2").Select MsgBox "Appel Grille via bouton barre d'outils" Application.CommandBars.FindControl(ID:0).Execute MsgBox "Appel Grille via VBA ShowDataForm" ActiveSheet.ShowDataForm MsgBox "Appel Grille via Menu Données, Formulaire" 'pour XL2000 menu Données, fOrmulaire SendKeys "%DO" 'pour XL95 menu Données, Grille 'SendKeys "%DG" End Sub @+
dans news:1dc901c4a2c3$d4c1ce50$, Jean-Paul V typed:
Bonjour
J'ai une macro qui positionne sur une base de Données Quelle est l'instruction suivante pour faire apparaitre le masque de saisie "Données Grille"
Est-il possible de formater le masque de saisie ( taile de chaque zone , controler les données entrées libellé ou valeur ect )
Merci encore pour votre aide
Bonsour ®,
en effet la solution de Jacky est la bonne ....
explications ??? succintes hum... ;-))
bien que la valeur interne des dates saisies (jour=partie
entiere,heure=partie décimale)
lorsque l'on utilise la feuille de calcul et les menus
le format des dates affichées dans la grille respectent le "format Local"
Lorsque que l'on active la grille via VBA
le format des dates affichées est le format standard VBA (anglais !!!)
pour s'en convaincre:
3 approches possibles avec une plage contenant des dates
Sub Appels_Grille()
'creation plage de données
[A1] = "Date"
[B1] = "quantité"
[C1] = "blabla"
[A2:C15] = ["=ROW()*5000 * Rand()"]
[A2:C15].Value = [A2:C15].Value
[A:A].NumberFormat = "dd/mm/yyyy hh:mm"
'----------------
Range("A2").Select
MsgBox "Appel Grille via bouton barre d'outils"
Application.CommandBars.FindControl(ID:0).Execute
MsgBox "Appel Grille via VBA ShowDataForm"
ActiveSheet.ShowDataForm
MsgBox "Appel Grille via Menu Données, Formulaire"
'pour XL2000 menu Données, fOrmulaire
SendKeys "%DO"
'pour XL95 menu Données, Grille
'SendKeys "%DG"
End Sub
@+
dans news:1dc901c4a2c3$d4c1ce50$a301280a@phx.gbl,
Jean-Paul V <anonymous@discussions.microsoft.com> typed:
Bonjour
J'ai une macro qui positionne sur une base de Données
Quelle est l'instruction suivante pour faire apparaitre
le masque de saisie "Données Grille"
Est-il possible de formater le masque de saisie ( taile
de chaque zone , controler les données entrées libellé ou
valeur ect )
Bonsour ®, en effet la solution de Jacky est la bonne .... explications ??? succintes hum... ;-)) bien que la valeur interne des dates saisies (jour=partie entiere,heure=partie décimale) lorsque l'on utilise la feuille de calcul et les menus le format des dates affichées dans la grille respectent le "format Local"
Lorsque que l'on active la grille via VBA le format des dates affichées est le format standard VBA (anglais !!!)
pour s'en convaincre: 3 approches possibles avec une plage contenant des dates Sub Appels_Grille() 'creation plage de données [A1] = "Date" [B1] = "quantité" [C1] = "blabla" [A2:C15] = ["=ROW()*5000 * Rand()"] [A2:C15].Value = [A2:C15].Value [A:A].NumberFormat = "dd/mm/yyyy hh:mm" '---------------- Range("A2").Select MsgBox "Appel Grille via bouton barre d'outils" Application.CommandBars.FindControl(ID:0).Execute MsgBox "Appel Grille via VBA ShowDataForm" ActiveSheet.ShowDataForm MsgBox "Appel Grille via Menu Données, Formulaire" 'pour XL2000 menu Données, fOrmulaire SendKeys "%DO" 'pour XL95 menu Données, Grille 'SendKeys "%DG" End Sub @+
dans news:1dc901c4a2c3$d4c1ce50$, Jean-Paul V typed:
Bonjour
J'ai une macro qui positionne sur une base de Données Quelle est l'instruction suivante pour faire apparaitre le masque de saisie "Données Grille"
Est-il possible de formater le masque de saisie ( taile de chaque zone , controler les données entrées libellé ou valeur ect )