Risultati da 1 a 4 di 4

Discussione: Macro formattante



  1. #1
    L'avatar di Pier
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    MILANO
    Età
    51
    Messaggi
    6
    Versione Office
    2013
    Likes ricevuti
    0
    Likes dati
    2

    Macro formattante

    Salve a tutti,

    sembrerà banale ma non riesco a creare una macro che esegua un semplice comando F2 -> Invio (ovvero che vada alla cella seguente) e si rilanci a ciclo continuo in modo da cambiare il formato della colonna A.
    Se lo faccio da tastiera posizionandomi in A4, la edito con F2 e do un invio vedo poi la cella come in A2 ed A3 del file allegato.
    Siccome devo fare questa operazione per oltre 50.000 righe ho pensato ad una macro ma proprio non mi riesce...

    Grazie 1000 per ogni aiuto dovesse arrivare.

    CIAO !
    Pier
    File Allegati File Allegati

  2. #2
    L'avatar di A.Maurizio
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Torino
    Età
    56
    Messaggi
    383
    Versione Office
    2013
    Likes ricevuti
    44
    Likes dati
    0
    Ciao Pier , non o capito Bene la tua Richiesta : Scusa , Tu Vorresti fare in modi che ad ogni fine riga il Cursore torni alla Colonna A .
    O solo per la Colonna A ?
    In Piùquale Formatzione vuoi Adottare ; Fammi Sapere forse ti posso Aiutare Grazie

  3. #3
    L'avatar di Pier
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    MILANO
    Età
    51
    Messaggi
    6
    Versione Office
    2013
    Likes ricevuti
    0
    Likes dati
    2
    Ciao Maurizio,

    grazie per la risposa.

    In pratica se guardi le celle A2 ed A3 vedi un codice formattato correttamente mentre da A3 a scendere no.

    Se in A3 faccio F2 ed invio il formato cambia; vorrei scrivere una macro che da ovunque mi posiziono faccia F2 invio scendendo (A3...A4 ... .A5 ecc....).

    Spero di essere stato più comprensibile.

    Grazie 1000
    Ciao Pier

  4. #4
    L'avatar di GiuseppeMN
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Mantova
    Messaggi
    864
    Versione Office
    2000 - 2013
    Likes ricevuti
    285
    Likes dati
    160
    Buona giornata, Pier e un caro saluto a Maurizio.

    @ Pier
    Mi sembra di capire che tutte le Celle in Colonna "A" sono in Formato "Testo".
    Nel caso in cui in Colonna "A" non ci siano Celle vuote tra una Cella valida e la successiva, credo potresti provare con questo Codice:

    Codice: 
    Option Explicit
    
    Sub Testo()
    Application.ScreenUpdating = False
    Dim Tst As String
    Dim nrc As Long
        nrc = 2
            Do While Cells(nrc, 1) <> ""
                Cells(nrc, 1) = CStr(Cells(nrc, 1))
                    nrc = nrc + 1
            Loop
    Application.ScreenUpdating = True
    End Sub


    A disposizione.

    Buon fine settimana.

    Giuseppe
    Windows XP Excel 2000 - Windows 10 Excel 2013

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
  •