Risultati da 1 a 3 di 3

Discussione: Stringa Vuota



  1. #1
    L'avatar di Allocco
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    292
    Versione Office
    2010
    Likes ricevuti
    48
    Likes dati
    6

    Stringa Vuota

    Ciao a tutti ho una cella che apparentemente è vuota, sembra una linea continua, ma se uso Len() mi dice che ci sono 115 caratteri, che pero non sono spazi vuoti, infatti ho usato

    Codice: 
    d = Cells(x, 1)
    L1 = Len(d)
    If L1 > 2 And Mid(d, 1, 2) = "  " Then GoTo 1
    per definire che se ci sono 2 spazi vuoti mi esegue un Goto, ma non trova nessuno spazio vuoto, non so che tipo di carattere sia invisibile, ho provato anche con "" oppure Null, probabile che siano caratteri di disegno che non si vedono.

    come posso risalire al carattere vuoto, ho usato sia

    Codice: 
    L2 = asc(mid(d,1,1))
    che

    Codice: 
    L2 = chr(mid(d,1,1))
    per poter almeno risalire al codice Ascii in modo da poter fare un confronto

    nel ciclo che uso infatti la x fa parte di un ciclo, non conosco a priori se la cella in esame sembri vuota con gli spazi o ci siano caratteri, potrei invertire il processo nel senso che se contiene almeno un carattere Ascii che faccia parte dell'alfabeto, non attivi il Goto

    qualche consiglio?

    ho inserito un esempio della stringa in esame cella A4 ho fatto pure testo in colonna dalla B4 il giallo l'ho messo io ma se si toglie si vede che non ce niente ed è sparita la griglia, quindi qualcosa ce.

    Ciao Allocco (8-D)
    File Allegati File Allegati

  2. #2

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2808
    Versione Office
    Excel 2013
    Likes ricevuti
    1020
    Likes dati
    979

    Re: Stringa Vuota

    E' il codice.carattere 160.
    prova così:
    Codice: 
    range("a4")=Replace(Range("a4"), Chr(160), "") 
    

  3. #3
    L'avatar di Allocco
    Clicca e Apri
    Data Registrazione
    Jan 2016
    Località
    Napoli
    Messaggi
    292
    Versione Office
    2010
    Likes ricevuti
    48
    Likes dati
    6

    Re: Stringa Vuota

    Ciao Rubik, grazie per la risposta, mi sono posto però la domanda come eri riuscito a sapere il codice del carattere, se lo conoscevi già ok, ma come sei risalito al codice, giusto per non rimanere in panne per un problema successivo simile.

    alla fine ci sono arrivato, basta un semplice ciclo di confronto sui caratteri Ascii come questo

    Codice: 
    Sub cercaChar()
    Dim x, d
    
    
    d = Cells(4, 1)
    For x = 1 To 255
        If Mid(d, 1, 1) = Chr(x) Then
            Msgbox"il carattere cercato è il " & x
            Exit sub
        End If
    Next x
    End Sub
    Ciao e comunque Grazie Allocco (8-D)

Discussioni Simili

  1. [Risolto] Uscire da combo vuota
    Di frapu nel forum Domande su Excel VBA e MACRO
    Risposte: 13
    Ultimo Messaggio: 24/02/17, 02:18
  2. [Risolto] Eliminare i duplicati lasciando la cella vuota
    Di Samuela nel forum Domande su Excel in generale
    Risposte: 4
    Ultimo Messaggio: 14/11/16, 16:09
  3. Ricerca nominativi con la cella data di nascita vuota
    Di KARLO16 nel forum Domande su Excel in generale
    Risposte: 5
    Ultimo Messaggio: 17/07/16, 12:52
  4. Evitare di eseguire una Macro se una cella è vuota
    Di Gerardo Zuccalà nel forum Domande su Excel VBA e MACRO
    Risposte: 8
    Ultimo Messaggio: 28/06/16, 10:02
  5. Macro di inserimento riga vuota ad una data condizione.
    Di pipp333 nel forum Domande su Excel VBA e MACRO
    Risposte: 13
    Ultimo Messaggio: 04/02/16, 10:49

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
  •