Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Aprire una finestra ridotta ad icona.

78 views
Skip to first unread message

Alberto

unread,
Nov 13, 2009, 11:35:34 AM11/13/09
to
La mia necessità è quella di aprire, con un codice Excel, la finestra
di un altro programma.
L'altro programma, che è il Personal Communications IBM (emul. 3270),
sarebbe già aperto e ridotto a icona; presente quindi nella barra
delle applicazioni.

Ciao e grazie in anticipo.

- Excel 2003
- Windows XP PRO
- Personal Communications Versione 5.0

Tiziano Marmiroli

unread,
Nov 13, 2009, 6:18:14 PM11/13/09
to
Il Fri, 13 Nov 2009 08:35:34 -0800 (PST), Alberto ha scritto:

>La mia necessit� � quella di aprire, con un codice Excel, la finestra
>di un altro programma.
>L'altro programma, che � il Personal Communications IBM (emul. 3270),
>sarebbe gi� aperto e ridotto a icona; presente quindi nella barra


>delle applicazioni.
>
>Ciao e grazie in anticipo.
>
>- Excel 2003
>- Windows XP PRO
>- Personal Communications Versione 5.0

Vedi, ad esempio, nella guida in linea

Sub AppActivate(Title, [Wait])
Membro di VBA.Interaction


Newsgroup: microsoft.public.it.office.excel
Data: Mer 12 Nov 2003 19:02
Oggetto: aiuto macro lancio applicativo
http://www.google.it/groups?threadm=TAusb.11841%249_.443465%40news1.tin.it

Codice: invio di sequenze di tasti a un'altra applicazione (Visual
Basic)
http://msdn.microsoft.com/library/ita/default.asp?url=/library/ITA/dv_vbCode/html/vbtskcodesendingkeystrokestoanotherapplicationvisualbasic.asp


Facci sapere se e come hai risolto, grazie.
--
Tiziano Marmiroli
Microsoft MVP - Office System
http://www.riolab.org

eliano

unread,
Nov 13, 2009, 7:09:01 PM11/13/09
to

"Alberto" ha scritto:

> La mia necessità è quella di aprire, con un codice Excel, la finestra
> di un altro programma.
> L'altro programma, che è il Personal Communications IBM (emul. 3270),
> sarebbe già aperto e ridotto a icona; presente quindi nella barra
> delle applicazioni.
>

Ciao Alberto.
Vedi sulla guida in linea se l'istruzione: AppActivate ti può essere utile.
Saluti
Eliano

Alberto

unread,
Nov 14, 2009, 3:21:44 PM11/14/09
to
Ho risolto!!!

AppActivate "emul. 3270"
................. = xlMaximized

non sono riuscito a trovare nulla da mettere al posto dei puntini e
allora ho risolto con un semplice

SendKeys "~"

ciao e grazie Alberto.

Alberto

unread,
Nov 17, 2009, 6:38:23 AM11/17/09
to

Mi correggo, a volte funzione a volte no! E' strano!!!
Sapete quindi cosa mettere al posto dei puntini, in modo da NON
utilizzare Sendkeys?
ciao e grazie


Alberto

unread,
Nov 18, 2009, 5:31:16 PM11/18/09
to

TROVATO!!!!!
SendKeys "% "
SendKeys "{DOWN}"
SendKeys "{DOWN}"
SendKeys "{DOWN}"
SendKeys "{DOWN}"
SendKeys "{ENTER}"


Alberto

unread,
Nov 19, 2009, 1:13:29 PM11/19/09
to

>     SendKeys "{ENTER}"

No, ENTER non funziona, si deve usare RETURN

0 new messages