Risultati da 1 a 20 di 20

Discussione: Traduttore formule Excel...... con problemini



  1. #1
    L'avatar di zio_tom
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Veneto
    Messaggi
    432
    Versione Office
    2010 - Win10
    Mi Piace ricevuti
    63
    Mi Piace dati
    15

    Question Traduttore formule Excel...... con problemini

    allego una cartella Excel per tradurre le formule da italiano ad inglese e viceversa
    http://dropcanvas.com/4ccww

    le cose strane sono:
    1) Le dimensioni di oltre 1.2MB, che mi sembrano esagerato, a spanne con 1B per caratterere dovremmo essere sui 150kB

    2) centra poco con il programma, avendo usato delle ComboBox ed essendo circa 230 elementi da scorrere mi son accorto che la rotellina dentro la ComboBox ed anche nelle ListBox ecc NON FUNZIONA
    facendo ricerche in rete ho trovato ben poco
    se guardate dentro al file c'è Modulo1 il cui cadice dovrebbe far funzionare lo scorrimento con rotelline dentro una ListBox..... ma non mi funziona
    lanciando 'test' da dentro VBA avrebbe dovuto funzionare



    :111:

  2. #2
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    48
    Messaggi
    4894
    Versione Office
    Office 2013
    Mi Piace ricevuti
    725
    Mi Piace dati
    738
    Ciao Zio_Tom
    Ottimo questo tool, è mi è piaciuto talmente tanto che l'ho messo nella sezione Link Utili cosi da avere una maggiore visibilità nel tempo
    Grazie

    Non mandate messaggi privati per problemi di excel, usate il forum per rishieste di aiuto
    Scarica il nuovo Add-ins per inserire griglie ed intervalli di Excel con il BBCode Clicca qui

  3. #3
    L'avatar di zio_tom
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Veneto
    Messaggi
    432
    Versione Office
    2010 - Win10
    Mi Piace ricevuti
    63
    Mi Piace dati
    15
    ma non mi dai il "Mi Piace" ??? :237: :176:
    :999::999:

    PS: hai notato le 2 strade una con ed una senza VBA
    quella in VBA vorrei metetrla nel file Personal per averla sempre a disposizione per poter inserire le funzioni nascenti di Excel nei codici VBA

  4. #4
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    66
    Messaggi
    2094
    Versione Office
    2010/2013 PC
    Mi Piace ricevuti
    353
    Mi Piace dati
    37
    Citazione Originariamente Scritto da Gerardo Zuccalà Visualizza Messaggio
    Ciao Zio_Tom
    Ottimo questo tool, è mi è piaciuto talmente tanto che l'ho messo nella sezione Link Utili cosi da avere una maggiore visibilità nel tempo
    Grazie
    Forse questa è più simpatica :26:

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  5. #5
    L'avatar di zio_tom
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Veneto
    Messaggi
    432
    Versione Office
    2010 - Win10
    Mi Piace ricevuti
    63
    Mi Piace dati
    15
    se metti da inglese ad italiano l'ordine NON è alfabetico!!!
    e poi perchè più simpatica???
    con il problema di cui sopra mi sembra MENO simpatica

    PS: comunque ho postato il file solo per le domande che ho fatto ma che nessuno fa menzione
    :999:
    PPS: su di un forum in cui si dovrebbe condividere..... mi posti un file con i fogli protetti!!!!
    vuoi far vedere quanto bravo sei???
    per me tale atteggiamento non è tollerabile!!! e se viene accettato mi adeguerò nel non condividere
    ed invece che collaborativo diventerò silente
    spero in una presa di posizione di Gerardo

  6. #6
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    66
    Messaggi
    2094
    Versione Office
    2010/2013 PC
    Mi Piace ricevuti
    353
    Mi Piace dati
    37
    Citazione Originariamente Scritto da zio_tom Visualizza Messaggio
    se metti da inglese ad italiano l'ordine NON è alfabetico!!!
    e poi perchè più simpatica???
    con il problema di cui sopra mi sembra MENO simpatica

    PS: comunque ho postato il file solo per le domande che ho fatto ma che nessuno fa menzione
    :999:
    PPS: su di un forum in cui si dovrebbe condividere..... mi posti un file con i fogli protetti!!!!
    vuoi far vedere quanto bravo sei???
    per me tale atteggiamento non è tollerabile!!! e se viene accettato mi adeguerò nel non condividere
    ed invece che collaborativo diventerò silente
    spero in una presa di posizione di Gerardo
    Troppo polemico.
    Per quanto riguarda il foglio protetto, ho dimenticato di sproteggerlo, tutti sanno che condivido qualunque cosa e non voglio dimostrare a nessuno quanto sono bravo (vedi tutti i miei post) ed inoltre non chiedo a nessuno i MI PIACE per arrivare in vetta a me basta un semplice grazie. Con questo, ti prego, se hai altro da dirmi fallo in altra sede.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  7. #7
    L'avatar di zio_tom
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Veneto
    Messaggi
    432
    Versione Office
    2010 - Win10
    Mi Piace ricevuti
    63
    Mi Piace dati
    15
    hai ragione sono polemico..... di natura
    ma il foglio protetto con la sfida di "più simpatica" mi aveva fatto andatre la mosca al naso
    mi scuso...
    sul mi piace son battute scherzose
    è vero ciò che scrivi in firma
    aggiugerei anche un sorriso... che non costa nulla
    senza rancori
    :999:

    aggiungo il traduttore ottimizzato in VBA
    http://dropcanvas.com/pb1zy

  8. #8
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    66
    Messaggi
    2094
    Versione Office
    2010/2013 PC
    Mi Piace ricevuti
    353
    Mi Piace dati
    37
    Citazione Originariamente Scritto da zio_tom Visualizza Messaggio
    hai ragione sono polemico..... di natura
    ma il foglio protetto con la sfida di "più simpatica" mi aveva fatto andatre la mosca al naso
    mi scuso...
    sul mi piace son battute scherzose
    è vero ciò che scrivi in firma
    aggiugerei anche un sorriso... che non costa nulla
    senza rancori
    :999:



    aggiungo il traduttore ottimizzato in VBA
    http://dropcanvas.com/pb1zy
    Senza rancore :222: per quanto mi riguarda tutto è già finito.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  9. #9
    L'avatar di zio_tom
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Veneto
    Messaggi
    432
    Versione Office
    2010 - Win10
    Mi Piace ricevuti
    63
    Mi Piace dati
    15
    dopo lunga ricerca ho trovato la soluzione per usare la rotellina del mouse dentro a ComboBox ed eventualmente anche su ListBox
    e con elenco lungo risulta davvero comoda
    http://dropcanvas.com/ms0zv


    in un Modulo
    Codice: 
    Private Type POINTAPI
            X As Long
            Y As Long
    End Type
    
    Private Type MOUSEHOOKSTRUCT
            pt As POINTAPI
            hwnd As Long
            wHitTestCode As Long
            dwExtraInfo As Long
    End Type
    
    Private Declare Function FindWindow Lib "user32" _
                                            Alias "FindWindowA" ( _
                                                            ByVal lpClassName As String, _
                                                            ByVal lpWindowName As String) As Long
    
    Private Declare Function GetWindowLong Lib "user32.dll" _
                                            Alias "GetWindowLongA" ( _
                                                            ByVal hwnd As Long, _
                                                            ByVal nIndex As Long) As Long
    
    Private Declare Function SetWindowsHookEx Lib "user32" _
                                            Alias "SetWindowsHookExA" ( _
                                                            ByVal idHook As Long, _
                                                            ByVal lpfn As Long, _
                                                            ByVal hmod As Long, _
                                                            ByVal dwThreadId As Long) As Long
    
    Private Declare Function CallNextHookEx Lib "user32" ( _
                                                            ByVal hHook As Long, _
                                                            ByVal nCode As Long, _
                                                            ByVal wParam As Long, _
                                                            lParam As Any) As Long
    
    Private Declare Function UnhookWindowsHookEx Lib "user32" ( _
                                                            ByVal hHook As Long) As Long
    
    Private Declare Function WindowFromPoint Lib "user32" ( _
                                                            ByVal xPoint As Long, _
                                                            ByVal yPoint As Long) As Long
    
    Private Declare Function GetCursorPos Lib "user32.dll" ( _
                                                            ByRef lpPoint As POINTAPI) As Long
    
    Private Const WH_MOUSE_LL As Long = 14
    Private Const WM_MOUSEWHEEL As Long = &H20A
    Private Const HC_ACTION As Long = 0
    Private Const GWL_HINSTANCE As Long = (-6)
    Private mLngMouseHook As Long
    Private mListBoxHwnd As Long
    Private mbHook As Boolean
    Private mCtl As MSForms.Control
    Dim n As Long
    
    Sub HookListBoxScroll(frm As Object, ctl As MSForms.Control)
    Dim lngAppInst As Long
    Dim hwndUnderCursor As Long
    Dim tPT As POINTAPI
         GetCursorPos tPT
         hwndUnderCursor = WindowFromPoint(tPT.X, tPT.Y)
         If Not frm.ActiveControl Is ctl Then
                 ctl.SetFocus
         End If
         If mListBoxHwnd <> hwndUnderCursor Then
                 UnhookListBoxScroll
                 Set mCtl = ctl
                 mListBoxHwnd = hwndUnderCursor
                 lngAppInst = GetWindowLong(mListBoxHwnd, GWL_HINSTANCE)
                 If Not mbHook Then
                         mLngMouseHook = SetWindowsHookEx( _
                                                         WH_MOUSE_LL, AddressOf MouseProc, lngAppInst, 0)
                         mbHook = mLngMouseHook <> 0
                 End If
         End If
    End Sub
    
    Sub UnhookListBoxScroll()
         If mbHook Then
                    Set mCtl = Nothing
                 UnhookWindowsHookEx mLngMouseHook
                 mLngMouseHook = 0
                 mListBoxHwnd = 0
                 mbHook = False
            End If
    End Sub
    
    Private Function MouseProc( _
                 ByVal nCode As Long, ByVal wParam As Long, _
                 ByRef lParam As MOUSEHOOKSTRUCT) As Long
    Dim idx As Long
            On Error GoTo errH
         If (nCode = HC_ACTION) Then
                 If WindowFromPoint(lParam.pt.X, lParam.pt.Y) = mListBoxHwnd Then
                         If wParam = WM_MOUSEWHEEL Then
                                    MouseProc = True
                                    If lParam.hwnd > 0 Then idx = -1 Else idx = 1
                                 idx = idx + mCtl.TopIndex
                                 If idx >= 0 Then mCtl.TopIndex = idx
                                    Exit Function
                         End If
                 Else
                         UnhookListBoxScroll
                 End If
         End If
         MouseProc = CallNextHookEx( _
                                 mLngMouseHook, nCode, wParam, ByVal lParam)
         Exit Function
    errH:
         UnhookListBoxScroll
    End Function
    nella UserForm
    Codice: 
    Private Sub ComboBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
        HookListBoxScroll Me, Me.ComboBox1
    End Sub
    
    Private Sub UserForm1_QueryClose(Cancel As Integer, CloseMode As Integer)
        UnhookListBoxScroll
    End Sub
    :999:

  10. #10
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    48
    Messaggi
    4894
    Versione Office
    Office 2013
    Mi Piace ricevuti
    725
    Mi Piace dati
    738
    Ciao Zio_Tom
    Grazie per il tuo contributo che dai a questo forum, le tue formule sono di buon livello tuttavia ti chiedo di dare un occhiata al regolamento ed in particolare alla regola #14
    Grazie ancora
    Ciao
    Ultima modifica fatta da:Gerardo Zuccalà; 08/11/15 alle 22:14

    Non mandate messaggi privati per problemi di excel, usate il forum per rishieste di aiuto
    Scarica il nuovo Add-ins per inserire griglie ed intervalli di Excel con il BBCode Clicca qui

  11. #11
    L'avatar di G.Bove
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Milano
    Età
    50
    Messaggi
    594
    Versione Office
    2010
    Mi Piace ricevuti
    22
    Mi Piace dati
    120
    Buon 2016
    E' possibile "resuscitare" il file in questione?

    Grazie
    Gene

  12. #12
    L'avatar di rollis13
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Cordenons
    Messaggi
    544
    Versione Office
    2010 64bit
    Mi Piace ricevuti
    86
    Mi Piace dati
    31
    A questo punto senza file "a scadenza" puoi usare "sempre" questo link: http://it.excel-translator.de/translator/ (impostaci la lingua italiana se serve) così puoi tradurre anche intere formule complesse.

  13. I seguenti utenti hanno dato un "Mi Piace"


  14. #13
    L'avatar di G.Bove
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Milano
    Età
    50
    Messaggi
    594
    Versione Office
    2010
    Mi Piace ricevuti
    22
    Mi Piace dati
    120
    Grazie, utilissimo ed inserito nei preferiti.
    Approfitto per chiederti se puoi aiutarmi anche per il mio ultimo post sui grafici pivot.

    Ciao
    Gene

  15. #14
    L'avatar di Amerigo
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Salerno
    Età
    46
    Messaggi
    64
    Versione Office
    2016
    Mi Piace ricevuti
    9
    Mi Piace dati
    40

    Re: Traduttore formule Excel...... con problemini

    Citazione Originariamente Scritto da Baloon_50 Visualizza Messaggio
    Forse questa è più simpatica :26:
    Buona sera Baloon_50,

    Il file e veramente molto bello, ma ci vorrebbero però le indicazioni e spiegazioni sintetiche per ogni funzione tradotta, per essere un file mitico

    ciao

  16. #15
    L'avatar di Amerigo
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Salerno
    Età
    46
    Messaggi
    64
    Versione Office
    2016
    Mi Piace ricevuti
    9
    Mi Piace dati
    40

    Re: Traduttore formule Excel...... con problemini

    Citazione Originariamente Scritto da zio_tom Visualizza Messaggio
    dopo lunga ricerca ho trovato la soluzione per usare la rotellina del mouse dentro a ComboBox ed eventualmente anche su ListBox
    e con elenco lungo risulta davvero comoda
    http://dropcanvas.com/ms0zv



    :999:
    Sera zio_tom,

    si può fare nella combobox o nella convalida dati, che se uno inizia a digitare gli compaiono sugerimenti anneriti come se fosse in colonna?

  17. #16
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    66
    Messaggi
    2094
    Versione Office
    2010/2013 PC
    Mi Piace ricevuti
    353
    Mi Piace dati
    37

    Re: Traduttore formule Excel...... con problemini

    Citazione Originariamente Scritto da Amerigo Visualizza Messaggio
    Buona sera Baloon_50,

    Il file e veramente molto bello, ma ci vorrebbero però le indicazioni e spiegazioni sintetiche per ogni funzione tradotta, per essere un file mitico

    ciao
    ciao amerigo se vuoi una spiegazione delle funzioni ho già fatto qualcosa d'altro questo è solamente una traduzione.

    https://www.dropbox.com/s/rg99n3yiz0...zioni.zip?dl=0

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  18. I seguenti utenti hanno dato un "Mi Piace"


  19. #17
    L'avatar di Amerigo
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Salerno
    Età
    46
    Messaggi
    64
    Versione Office
    2016
    Mi Piace ricevuti
    9
    Mi Piace dati
    40

    Re: Traduttore formule Excel...... con problemini

    sera baloo

    non ho parole per esprimere l'ammirazione che ho per il tuo operato, "mitico"

    saluto con ammirazione
    Amerigo Fasolino

  20. #18
    L'avatar di Powerwin
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Milano
    Messaggi
    439
    Versione Office
    2010
    Mi Piace ricevuti
    68
    Mi Piace dati
    27

    Re: Traduttore formule Excel...... con problemini

    Scusate, ma questo più che un link utile, ora mi pare più un link inutile, nessun file è più scaricabile, forse sarebbe il caso di cancellare il post
    Flavio
    Non scrivetemi in MP per risolvere i problemi ed un grazie è sempre ben accetto quando ricevete degli aiuti

  21. #19
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    66
    Messaggi
    2094
    Versione Office
    2010/2013 PC
    Mi Piace ricevuti
    353
    Mi Piace dati
    37

    Re: Traduttore formule Excel...... con problemini

    Citazione Originariamente Scritto da Powerwin Visualizza Messaggio
    Scusate, ma questo più che un link utile, ora mi pare più un link inutile, nessun file è più scaricabile, forse sarebbe il caso di cancellare il post
    Ciao Power avevo cambiato il nome al file e non ho rimesso il link eccolo:

    https://www.dropbox.com/s/b53q59r7l4...zioni.zip?dl=0

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  22. #20
    L'avatar di Powerwin
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Milano
    Messaggi
    439
    Versione Office
    2010
    Mi Piace ricevuti
    68
    Mi Piace dati
    27

    Re: Traduttore formule Excel...... con problemini

    Citazione Originariamente Scritto da Baloon_50 Visualizza Messaggio
    Ciao Power avevo cambiato il nome al file e non ho rimesso il link eccolo:

    https://www.dropbox.com/s/b53q59r7l4...zioni.zip?dl=0
    Grazie
    Flavio
    Non scrivetemi in MP per risolvere i problemi ed un grazie è sempre ben accetto quando ricevete degli aiuti

Discussioni Simili

  1. [Risolto] formule su Excel
    Di FABRIZIO1947 nel forum Domande su Excel in generale
    Risposte: 10
    Ultimo Messaggio: 30/11/16, 14:12
  2. [Risolto] Le formule excel permettono di evidenziare le celle?
    Di fiulo nel forum Domande su Excel in generale
    Risposte: 12
    Ultimo Messaggio: 08/11/16, 14:38
  3. Traduttore formule per Excel ITA<->ENG
    Di TuttoExcel nel forum Link Utili
    Risposte: 4
    Ultimo Messaggio: 13/07/16, 21:11
  4. Stampare su carta l'elenco alfabetico delle formule di Excel
    Di Nicolabt nel forum Domande su Excel in generale
    Risposte: 28
    Ultimo Messaggio: 03/02/16, 21:41
  5. Serie A TIM Campionato di calcio con le formule di Excel
    Di Salvy nel forum Domande su Excel in generale
    Risposte: 9
    Ultimo Messaggio: 28/08/15, 20:50

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •