Excel: evitare virgolette con il copia incolla all'esterno?
Marco
Io uso excel per svariati motivi oltre quelli per il quale è stato
progettato: ci rinchiudo dentro di tutto.
Allora ho notato una cosa fastidiosa che magari, con un accorgimento
si potrebbe evitare, con l'aiuto di un genietto della lampada! :-)
Se per esempio salvo in una cella un testo di questo tipo: la neve è
bianca.
Mi capita che poi voglio farci un copia incolla in un programma
all'esterno di excel, spesso un form, mi incolla il testo fra i doppi
apici o virgolette.
Per capirci:
Seleziono la cella contentente il testo: la neve è bianca
Faccio ctrl+c
Seleziono il form o altro
Faccio ctrl+v
Mi viene incollato il testo fra gli apici così: "la neve è bianca"
E allora mi tocca andare a cancellare le virgolette inciminate
Ho notato che se però, invece che la cella, vado a selezionare il
testo nella barra della formula, questo non succede mai.
Non mi capita sempre e non ho ancora capito la relazione.
Allora io mi domandavo se c'era un sistema per salvare i dati di testo
nella cella in modo da non dover entrare nella barra della formula per
evitare queste fastidiose virgolette..
La parola ai guru :-)
Grazie a tutti
Marco
--
Realizzazione siti internet - http://www.ghisirds.it
Stereogrammi personalizzati - http://www.idee-regalo.biz
Risorse per geometri - http://www.geometri-reggio-emilia.it
Norman Jones
'---------------
Io uso excel per svariati motivi oltre quelli per il quale č stato
progettato: ci rinchiudo dentro di tutto.
Allora ho notato una cosa fastidiosa che magari, con un accorgimento
si potrebbe evitare, con l'aiuto di un genietto della lampada! :-)
Se per esempio salvo in una cella un testo di questo tipo: la neve č
bianca.
Mi capita che poi voglio farci un copia incolla in un programma
all'esterno di excel, spesso un form, mi incolla il testo fra i doppi
apici o virgolette.
Per capirci:
Seleziono la cella contentente il testo: la neve č bianca
Faccio ctrl+c
Seleziono il form o altro
Faccio ctrl+v
Mi viene incollato il testo fra gli apici cosě: "la neve č bianca"
E allora mi tocca andare a cancellare le virgolette inciminate
Ho notato che se perň, invece che la cella, vado a selezionare il
testo nella barra della formula, questo non succede mai.
Non mi capita sempre e non ho ancora capito la relazione.
Allora io mi domandavo se c'era un sistema per salvare i dati di testo
nella cella in modo da non dover entrare nella barra della formula per
evitare queste fastidiose virgolette..
La parola ai guru :-)
'---------------
Io non ho potuto replicare la tua esperienza.
Stai parlando di un altro progranna specifico
o in generale?
---
Regards,
Norman
Microsoft Excel MVP
eliano
"Norman Jones" ha scritto:
> Ciao Marco,
>
> '---------------
> Io uso excel per svariati motivi oltre quelli per il quale è stato
> progettato: ci rinchiudo dentro di tutto.
> Allora ho notato una cosa fastidiosa che magari, con un accorgimento
> si potrebbe evitare, con l'aiuto di un genietto della lampada! :-)
[cut]
>
> Io non ho potuto replicare la tua esperienza.
>
Per forza Norman, tu non sei il "genietto della lampada", sei solo un MVP.:-8)
Eliano
Marco
>
> Io non ho potuto replicare la tua esperienza.
>
> Stai parlando di un altro progranna specifico
> o in generale?
guarda Norman, fai come me:
vado in una cella, scrivo:
casa
poi faccio alt-invio e scrivo
verde
mi mette le 2 parole incolonnate su una cella.
torno su quella cella e faccio ctrl-c,
apro blocco note e faccio ctrl-v
mi viene scritto "casa verde" con le virgolette!!
come fare per fare in modo che non metta le virgolette??
ciao e grazie
marco
Norman Jones
'-----------------
guarda Norman, fai come me:
vado in una cella, scrivo:
casa
poi faccio alt-invio e scrivo
verde
mi mette le 2 parole incolonnate su una cella.
torno su quella cella e faccio ctrl-c,
apro blocco note e faccio ctrl-v
mi viene scritto "casa verde" con le virgolette!!
come fare per fare in modo che non metta le virgolette??
'-----------------
Riprova e incolla il tuo testo in WordPad anziche
NotePad.
Marco
> Riprova e incolla il tuo testo in WordPad anziche
> NotePad.
>
no, infatti non lo fa in wordpad e neanche in word, però per esempio
alcuni form si comportano come il notepad.
Allora, non è possibile fare un copia particolare, magari invece che
con ctrl-c usare un altro tasto che lancia un macro che copi in una
maniera particolare che poi funzioni anche con il notepad?
A occhio, se si mette la cella in una variabile vba, poi si lavora su
quella variabile in modo da farle tirare via le virgolette e poi la si
copia, dici che non si riesce a sopperire al problema?
grazie ancora Norman, sei un grande!!
Marco
mi è stato suggerito che il problema è che copia anche il separatore
di elenco o la tabulazione:
non c'è modo di copiare con una macro solo il puro contenuto?
Norman Jones
'---------------
mi è stato suggerito che il problema è che copia anche il separatore
di elenco o la tabulazione:
non c'è modo di copiare con una macro solo il puro contenuto?
'---------------
In un modulo standard (vedi di sotto) del
tuo file Personal.xls, incolla:
'=============>>
Option Explicit
'--------------------->>
Public Sub PutOnClipboard(Obj As Variant)
Dim MyDataObj As New DataObject
MyDataObj.SetText Format(Obj)
MyDataObj.PutInClipboard
End Sub
'--------------------->>
Public Sub CopyText()
Dim x As New DataObject
Dim sStr As String
With ActiveCell
sStr = Replace(.Text, Chr(10), Space(1))
End With
x.SetText sStr
x.PutInClipboard
End Sub
'<<=============
Alt-F11 per aprire l'Editor di VBE
Ctrl-R per aprire la finestra Gestione Progetti
selezionare il proggetto Personal.xls
Menu | Inserisci | Modulo
Incolla il suddetto codice
Alt-F11 per tornare in Excel
In un modulo standard (vedi di sotto)
del file di interesse, incolla il seguente
codice:
'=============>>
Public Sub UpdateMenu()
Dim CTRL As CommandBarControl
Set CTRL = Application.CommandBars("Cell"). _
Controls.Add(Type:=msoControlButton)
With CTRL
.OnAction = ThisWorkbook.Name & "!" & "CopyText"
.Caption = "Copia Testo"
.FaceId = 139
End With
End Sub
'<<=============
Alt-F11 per aprire l'Editor di VBA
Menu | Strumenti | Riferimenti |
Trova e seleziona la libreria:
Microsoft Forms 2.0 Object Library
Menu | Inserisci | Modulo
Incolla il suddetto codice
Alt-F11 per tornare in Excel
Alt-F8
Seleziona "UpdateMenu"
Esegui
Ora, per copiare un valore sul 'Clipboard' di
Windows in modo che sia possibile incollare
il valore senza le tue virgolette, fai click destra
sulla cella e seleziona 'Copia Testo' dal menu
del mouse, L'opzione 'Copia testo' sara'
disponible in qualsiasi file.
Norman Jones
Avrei voluto aggiungere che, per ulteriori
informazioni circa il clipboard di windows
nel contesto di VBA, vedi Chip Pearson a:
Working With The Windows Clipboard
http://www.cpearson.com/excel/clipboard.htm
Marco
wrote:
> Ciao Marco,
>
> Avrei voluto aggiungere che, per ulteriori
> informazioni circa il clipboard di windows
> nel contesto di VBA, vedi Chip Pearson a:
>
> Working With The Windows Clipboard
> http://www.cpearson.com/excel/clipboard.htm
eh, ma non lo mastico bene l'inglese... :-(
Marco
comunque, fra fumamenti di cervelli vari, sono riuscito a seguire
tutte le istruzioni, però mi da errore.
mi dice:
impossibile trovare la macro "cartella.xls'!CopyText' .
ho provato a capire dove sbaglia ma sono troppo indietro :-(
ce la faremo?? :-)
grazie
marco
Norman Jones
'-----------------
> Avrei voluto aggiungere che, per ulteriori
> informazioni circa il clipboard di windows
> nel contesto di VBA, vedi Chip Pearson a:
>
> Working With The Windows Clipboard
> http://www.cpearson.com/excel/clipboard.htm
eh, ma non lo mastico bene l'inglese... :-(
'-----------------
Hai comunque provato il codice suggerito da me?
Norman Jones
'-------------------
che casino, mi aspettavo qualcosa di più semplice!!! :-()
'-------------------
Non tutto e' semplice in questa vita! Forse la tua
domanda non era così semplice!
'-------------------
comunque, fra fumamenti di cervelli vari, sono riuscito a seguire
tutte le istruzioni, però mi da errore.
mi dice:
impossibile trovare la macro "cartella.xls'!CopyText' .
ho provato a capire dove sbaglia ma sono troppo indietro :-(
ce la faremo?? :-)
'-------------------
Avevo suggerito:
'---------------
In un modulo standard (vedi di sotto) del tuo
file Personal.xls, incolla:
'---------------
Marco
>
> Avevo suggerito:
>
> '---------------
> In un modulo standard (vedi di sotto) del tuo
> file Personal.xls, incolla:
> '---------------
eh, ma l'ho fatto.
Anche se per la verità il file personal non c'era, poi vi ho
registrato una macro sopra ed è comparso.
Poi ho creato un modulo, che uno c'era già, e vi ho copiato sopra
Option Explicit
Public Sub PutOnClipboard(Obj As Variant)
Dim MyDataObj As New DataObject
MyDataObj.SetText Format(Obj)
MyDataObj.PutInClipboard
End Sub
Public Sub CopyText()
Dim x As New DataObject
Dim sStr As String
With ActiveCell
sStr = Replace(.Text, Chr(10), Space(1))
End With
x.SetText sStr
x.PutInClipboard
End Sub
nel modulo invece della cartella che utilizzo vi ho messo:
Public Sub UpdateMenu()
Dim CTRL As CommandBarControl
Set CTRL = Application.CommandBars("Cell"). _
Controls.Add(Type:=msoControlButton)
With CTRL
.OnAction = ThisWorkbook.Name & "!" & "CopyText"
.Caption = "Copia Testo"
.FaceId = 139
End With
End Sub
eppure mi da quell'errore!!
help me..!