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
    513
    Versione Office
    2010 - Win10
    Likes ricevuti
    62
    Likes dati
    17

    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:
    n°3 - Win10pro + Office 2010 ----- n°1 - Win7pro + Office 2010 ----- n°1 - WinXPpro + Office 2010

  2. #2
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    49
    Messaggi
    4622
    Versione Office
    Office 365
    Likes ricevuti
    1027
    Likes dati
    988
    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

  3. #3
    L'avatar di zio_tom
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Veneto
    Messaggi
    513
    Versione Office
    2010 - Win10
    Likes ricevuti
    62
    Likes dati
    17
    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
    n°3 - Win10pro + Office 2010 ----- n°1 - Win7pro + Office 2010 ----- n°1 - WinXPpro + Office 2010

  4. #4
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    2805
    Versione Office
    2013 PC
    Likes ricevuti
    454
    Likes dati
    46
    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
    513
    Versione Office
    2010 - Win10
    Likes ricevuti
    62
    Likes dati
    17
    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
    n°3 - Win10pro + Office 2010 ----- n°1 - Win7pro + Office 2010 ----- n°1 - WinXPpro + Office 2010

  6. #6
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    2805
    Versione Office
    2013 PC
    Likes ricevuti
    454
    Likes dati
    46
    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
    513
    Versione Office
    2010 - Win10
    Likes ricevuti
    62
    Likes dati
    17
    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
    n°3 - Win10pro + Office 2010 ----- n°1 - Win7pro + Office 2010 ----- n°1 - WinXPpro + Office 2010

  8. #8
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    2805
    Versione Office
    2013 PC
    Likes ricevuti
    454
    Likes dati
    46
    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
    513
    Versione Office
    2010 - Win10
    Likes ricevuti
    62
    Likes dati
    17
    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:
    n°3 - Win10pro + Office 2010 ----- n°1 - Win7pro + Office 2010 ----- n°1 - WinXPpro + Office 2010

  10. #10
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    49
    Messaggi
    4622
    Versione Office
    Office 365
    Likes ricevuti
    1027
    Likes dati
    988
    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 21:14

  11. #11
    L'avatar di G.Bove
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Milano
    Età
    51
    Messaggi
    817
    Versione Office
    2010
    Likes ricevuti
    24
    Likes dati
    169
    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
    682
    Versione Office
    2010 64bit
    Likes ricevuti
    108
    Likes dati
    40
    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 "Like"


  14. #13
    L'avatar di G.Bove
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Milano
    Età
    51
    Messaggi
    817
    Versione Office
    2010
    Likes ricevuti
    24
    Likes dati
    169
    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à
    47
    Messaggi
    137
    Versione Office
    2016
    Likes ricevuti
    11
    Likes dati
    82

    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à
    47
    Messaggi
    137
    Versione Office
    2016
    Likes ricevuti
    11
    Likes dati
    82

    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à
    67
    Messaggi
    2805
    Versione Office
    2013 PC
    Likes ricevuti
    454
    Likes dati
    46

    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 "Like"


  19. #17
    L'avatar di Amerigo
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Salerno
    Età
    47
    Messaggi
    137
    Versione Office
    2016
    Likes ricevuti
    11
    Likes dati
    82

    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
    1011
    Versione Office
    2016 - 2010
    Likes ricevuti
    154
    Likes dati
    52

    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


  21. #19
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    2805
    Versione Office
    2013 PC
    Likes ricevuti
    454
    Likes dati
    46

    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
    1011
    Versione Office
    2016 - 2010
    Likes ricevuti
    154
    Likes dati
    52

    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


Discussioni Simili

  1. [Risolto] Traduttore automatico tramite macro
    Di Trial4life nel forum Domande su Excel VBA e MACRO
    Risposte: 19
    Ultimo Messaggio: 04/12/16, 15:22
  2. [Risolto] formule su Excel
    Di FABRIZIO1947 nel forum Domande su Excel in generale
    Risposte: 10
    Ultimo Messaggio: 30/11/16, 13:12
  3. [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, 13:38
  4. Traduttore formule per Excel ITA<->ENG
    Di TuttoExcel nel forum Link Utili
    Risposte: 4
    Ultimo Messaggio: 13/07/16, 20:11
  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, 19: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
  •