Discussion :

[dreloman]

Salut le forum, juste une petite question vite fais

Peut-on faire un copier d'une valeur d'un autre programme (exp:prog de telephone) et le collé dans exel avec soit un programme vba ou avec une macro spécial qui peut sortir de exel par aller copier puis revenir coller voila j'espere etre assez clair dans m'as question

[JackOuYA]

Bonjour,

Cela dépends de l'application concerné, tiens la maniére la plus simple , une adaptation de l'exemple dans l'aide en ligne Excel sur l'utilisation de SendKeys.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Sub CopieCollerCalc()
 
 
Dim ReturnValue, I
ReturnValue = Shell("CALC.EXE", 1)    ' Exécute l'application Calculatrice.
AppActivate ReturnValue            ' Active l'application Calculatrice.
For I = 1 To 100    ' Configure la boucle de comptage.
    SendKeys I & "{+}", True    ' Envoie des frappes de touches
Next I                ' à l'application Calculatrice pour
                            ' ajouter chaque valeur de I.
SendKeys "=", True    ' Fait le total général.
SendKeys "^C", True 'COPIE LE résultat dans presse papier
SendKeys "%{F4}", True    ' Envoie la combinaison ALT+F4 pour fermer
                                ' l'application Calculatrice.
 
Range("A1").PasteSpecial 'COLLE LE PRESSE PAPIER DANS A1
 
End Sub

[dreloman]

Je te remerci JackOuYA car ça va m'aider énormement

Une dernière question cet exemple allume et eteint la calculatrice mais si le programme est deja allumé il va relancer une 2ième calculatrice comment lui dire alors de considerer rien qu'une seule ?