Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Issue d'une page Web..oui....mais pas du tout le même type de grille..et le sujet n'a rien à voir avec le pilotage web !!! traitement dune cellule et d'une chaine de caractère
ok
Non le sujet était axé sur le pilotage page web depuis vba...ici c'est le traitement de données sur la feuille excel...rien à voir avec le pilotage web!
En général avec l'importation de la page web ...la grille peut se situer sur la col B...mais parfois sur la colA...ou sur toute autre col...Donc tout dépend de l'importation!
Merci Staple1600...ça fonctionne
En fait je recherche à positionner la 1ère cellule d'une feuille (issue de l'importation du page web) ayant des chiffres pour délimiter une plage de Chiffres (en fait une grille de 15 cases)..et cette plage n'est jamais au même endroit!!
Bonjour,
J'ai une cellule ayant une chaine de caractères comprenant des "range":
cellule =$F$3,$B$3:$B$4,$C$4:$F$4,$C$5:$D$5,$F$5
En fait j'aimerais en vba sélectionner et copier les 4 caractères comprenant le Range le plus proche de A1...comme
$B$3 dans l'exemple
Merci pour votre aide
Merci bxp Theze pour ta réponse
ça fonctionne bien...En fait il faut que je définisse le pourcentage de l'approximation des largeurs des cellules pour ainsi valider "la plage de cellules"...
J'ai testé avec du 10%...et ça me convient ;-)
J'aimerais comparer la largeur de 3 cellules (voir même 5 ( cellules) et si la largeur sont à peu près égales, valider la 3ème cellule en sélection :
Selection.Resize(Selection.Rows.Count + 2, Selection.Columns.Count + 4).Select
je laisse le fichier joint...macro avec résultat sur sheet2
En...
Merci Yurperqod pour ta réponse rapdie!
Ca fonctionne très bien.. j'ai déclaré
Dim ie As New InternetExplorer
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate "https://www.excel-downloads.com/"
IE.Document.Body.Style.Zoom = 1.5
Bonjour,
Je pilote une page web IE en vba...
Dim ie As New InternetExplorer
Set ie = CreateObject("internetExplorer.Application")
ie.Visible = True
ie.Navigate "http://www.google.fr/"
mais comment effectuer un zoom sur le navigateur..
Faut-il utiliser fonction API ou ActiveX??
Sur Win Seven -...
Merci pour tes précisions Dranreb...malgré tout...les sendkeys fonctionnent sur l'appli avec ce On error...pour l'instant je m'en contente...
Je continue la macro...je suis en phase 6 où je dois placer le mot de passe en fonction des placements des chiffres dans la grille...la grille que je...
Merci pour ton aide Dranreb ; bon j'avance un peu :
Dim dem
dem = Shell("C:\Program Files (x86)\ABBYY FineReader 10\HotFolder.exe", vbNormalFocus)
' On Error Resume Next
Dim PauseTime, Start
PauseTime = 0.01
Start = Timer
Do While Timer < Start + PauseTime
DoEvents
Loop
AppActivate...
J'utilise une macro pour piloter une page web ayant une grille à 10 chiffres pour valider un mot de passe.
1 je lance en vba la page web
2 je fais une capture d'ecran comportant la grille avec
keybd_event VK_MENU, 0, 0, 0
keybd_event VK_SNAPSHOT, 0, 0, 0
keybd_event VK_SNAPSHOT, 0...
Bonjour,
J'ai un fichier excel avec une horloge cadran qui doit se lancer par une macro!
Mais je n'arrive pas à lancer la macro à l'ouverture du fichier! ça tourne en boucle sans ouverture du fichier
J'utilise :
Private Sub Workbook_Open()
Application.Run
mais ça ne fonctionne pas!
Merci pour...
Merci Dugenou pour ce début de solution...C'est vrai qu'il faudrait l'adapter pour la grandeur des chiffres et les restes éventuels...Ca devient plus complexe!!!
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.