Bonjour
Je souhaite copier automatiquement via une macro certaines zones d'une feuille Excel (cellules D5 et G11) vers une Application métier
L'endroit où je souhaite coller ces informations correspond à des zones de texte classiques
Je pense que pour arriver à sélectionner les zones de texte de mon appli afin d'y coller les informations, il faut que j'utilise Sendkeys
J'ai commencé à coder la connection automatique à mon appli mais ensuite je ne sais pas comme récupérer les cellules D5 et G11 de mon fichier Excel pour les coller dans mon appli
Quelqu'un peut t'il m'aider, je galère?
Merci 🙂
Sub LancerGRT()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate "https://grt.sf.intra.laposte.fr:1443/IBB/"
IE.AddressBar = True
IE.MenuBar = True
IE.Toolbar = True
IE.Width = 1024
IE.Height = 768
IE.Left = 0
IE.FullScreen = False
IE.Visible = True
Set IE = Nothing
Application.SendKeys "{TAB}", True
End Sub
Je souhaite copier automatiquement via une macro certaines zones d'une feuille Excel (cellules D5 et G11) vers une Application métier
L'endroit où je souhaite coller ces informations correspond à des zones de texte classiques
Je pense que pour arriver à sélectionner les zones de texte de mon appli afin d'y coller les informations, il faut que j'utilise Sendkeys
J'ai commencé à coder la connection automatique à mon appli mais ensuite je ne sais pas comme récupérer les cellules D5 et G11 de mon fichier Excel pour les coller dans mon appli
Quelqu'un peut t'il m'aider, je galère?
Merci 🙂
Sub LancerGRT()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate "https://grt.sf.intra.laposte.fr:1443/IBB/"
IE.AddressBar = True
IE.MenuBar = True
IE.Toolbar = True
IE.Width = 1024
IE.Height = 768
IE.Left = 0
IE.FullScreen = False
IE.Visible = True
Set IE = Nothing
Application.SendKeys "{TAB}", True
End Sub
