Aiutamici Forum
Benvenuto Ospite Cerca | Topic Attivi | Utenti | | Log In | Registra

stringhe vba Opzioni
merumeni
Inviato: Sunday, February 06, 2005 7:11:59 PM
Rank: Member

Iscritto dal : 8/24/2004
Posts: 13
Ciao a tutti.
Sto tentando di realizzare un programmino con excel e vba …ma mi sono bloccato sull’uso delle stringhe.
Come faccio per dichiarare il contenuto di una stringa , prima che questa esista? Ho ragionato in questo modo.
Se voglio automatizzare la procedura, non posso sapere a priori cosa ci sarà, per esempio, nella cella A 50.
So, però che sicuramente ci sarà una vocale. Allora mi dico: se da qualche parte, in una variabile, riesco ad inserire il codice chr delle vocali , il gioco è fatto. Potrò, per esempio nelle istruzioni dire:
Cerca [for…next] nel range; vedi se in una cella c’è valore chr (65) e allora…
E’ giusto il ragionamento? Però, come diavolo fare? Dichiaro più variabili?
A=chr(60)
B=chr(69)
C=chr(73)
Una sola variabile Z=chr(60) e poi??????
Forse è meglio dire quale è in concreto il problema che devo risolvere.
Nelle celle di una colonna ho delle lettere: 2 o quattro per ogni cella.
Vorrei spazzare quella colonna ed evidenziare con un colore quelle celle in cui è presente o sono presenti lettere da me definite.
Es nel range 1:4 di A ho Cono, Gatta, Luna , Zio Voglio che le celle A1 ed A3 e A4 cambino colore perché contengono la O e la U. e IO
Come inserisco in una variabile la A e la O e IO per poi utilizzare eventualmente la funzione Mid()-se poi è quella giusta…….
Grazie ai volenterosi che vorranno darmi una mano. Resto in “ fiduciosa” attesa.
Ciao
Sponsor
Inviato: Sunday, February 06, 2005 7:11:59 PM

 
dead
Inviato: Tuesday, February 08, 2005 1:32:27 PM

Rank: AiutAmico

Iscritto dal : 9/20/2004
Posts: 1,597
Ci sono vari modi, ma uno dei piu semplici è usare la funzione InStr() per la quale troverai la descrizione nell'help di VBA.
Il concetto è: se (if) nella mia cella c'è la lettera tal dei tali, allora (then)...

Ricordati che la funzione InStr() ritorna 0 se non trova niente, o un valore diverso da zero se trova una corrispondenza.

piu o meno:
For each cella in range
if (InStr(miastringa, mia lettera)))( 0 then
colora di rosso
end if
next

La scrittura sintatticamente corretta trovala tu, mica vorrai la pappa fatta?<img src=icon_smile_big.gif border=0 align=middle><img src=icon_smile_big.gif border=0 align=middle>


Sono cosi avanti che quando guardo indietro vedo il futuro.
merumeni
Inviato: Wednesday, February 09, 2005 1:09:29 PM
Rank: Member

Iscritto dal : 8/24/2004
Posts: 13
Grazie, Dead, per l'attenzione. La pappa pronta? Non mi piace...ma certe volte -non è il ns. caso!-non si può dire a chi sta annegando:"adesso ti spiego come stare a galla"!. Comunque,ti ringrazio ancora. Provo col tuo suggerimento. Ciao
merumeni
Inviato: Wednesday, February 09, 2005 1:09:52 PM
Rank: Member

Iscritto dal : 8/24/2004
Posts: 13
Grazie, Dead, per l'attenzione. La pappa pronta? Non mi piace...ma certe volte -non è il ns. caso!-non si può dire a chi sta annegando:"adesso ti spiego come stare a galla"!. Comunque,ti ringrazio ancora. Provo col tuo suggerimento. Ciao
merumeni
Inviato: Wednesday, February 09, 2005 1:10:54 PM
Rank: Member

Iscritto dal : 8/24/2004
Posts: 13
Grazie, Dead, per l'attenzione. La pappa pronta? Non mi piace...ma certe volte -non è il ns. caso!-non si può dire a chi sta annegando:"adesso ti spiego come stare a galla"!. Comunque,ti ringrazio ancora. Provo col tuo suggerimento. Ciao
Utenti presenti in questo topic
Guest


Salta al Forum
Aggiunta nuovi Topic disabilitata in questo forum.
Risposte disabilitate in questo forum.
Eliminazione tuoi Post disabilitata in questo forum.
Modifica dei tuoi post disabilitata in questo forum.
Creazione Sondaggi disabilitata in questo forum.
Voto ai sondaggi disabilitato in questo forum.

Main Forum RSS : RSS

Aiutamici Theme
Powered by Yet Another Forum.net versione 1.9.1.8 (NET v2.0) - 3/29/2008
Copyright © 2003-2008 Yet Another Forum.net. All rights reserved.