Newsgroup: it.comp.os.win.software
Titolo: Celle di excell

Salve a tutto l'ng. Ho un piccolo problema e spero che qualcuno di voi possa
cortesemente aiutarmi. Devo colorare una cella di un foglio con dei dati
inseriti ma vorrei che il
colore non venisse stampato. C'è un metodo per ottenere questo risultato?
Con l'help non ho trovate nulla.
Grazie
--
®Fulmine©
cel...@tin.it
Sono gradite risposte anche in e-mail.

Grazie
Devi configurare la stampante "stampa in scala di grigi".
Sergio Nemec
«Se vuoi mandare e-mail, riprenditi i dollari!»

 colore non venisse stampato.
Se ti sai arrangiare col VBA potresti, prima della stampa, lanciare una
routine che memorizzi le impostazioni di cella che non desideri stampare
assegnando quelle che preferisci per la stampa quindi, a stampa felicemente
conclusa, un'altra routine potrebbe rimettere a posto le cose. Un piccolo
esempio:
Copia in un nuovo modulo e sostituisci a "Foglio1" il nome del tuo foglio ed
ai numeri di colore di .Interior.ColorIndex quelli che usi tu:
Option Explicit
Private Const sMOD_FOGLIO     As String = "Foglio1"
Private Const sMOD_FOGLIO_TMP As String = sMOD_FOGLIO & " (2)"
Public Sub ImpostaPrimaDiStampa( _
)
Dim rng As Excel.Range
Dim wks As Excel.Worksheet
Dim l_Row&
  With Application.ActiveWorkbook
    With .ActiveSheet
      If .Name = sMOD_FOGLIO Then
        With .Parent.Sheets
          Let Application.DisplayAlerts = False
          On Local Error Resume Next
          Call .Item(sMOD_FOGLIO_TMP).Delete
          On Local Error GoTo 0
          Let Application.DisplayAlerts = True
          Let .Add( _
              After:=.Item(sMOD_FOGLIO) _
            , Type:=.Item(sMOD_FOGLIO).Type _
            ).Name = sMOD_FOGLIO_TMP
        End With
        For Each rng In .UsedRange
          With rng
            Select Case True
            ' Istruzione da modificare in base alle
            ' tue necessita'.
            '
            Case _
                .Interior.ColorIndex = 3 _
              , .Interior.ColorIndex = 6
              Let l_Row = l_Row + 1
              With .Parent.Parent.Sheets.Item(sMOD_FOGLIO_TMP)
                Let .Cells(l_Row, 1).Value = rng.Address
                Let .Cells(l_Row, 2).Interior.ColorIndex _
                  = rng.Interior.ColorIndex
                Let rng.Interior.ColorIndex = xlColorIndexNone
              End With
            Case Else
            End Select
          End With
        Next
        Call .Select
      End If
    End With
  End With
End Sub
Public Sub RipristinaDopoStampa( _
)
Dim rng As Excel.Range
  With Application
    With .Worksheets(sMOD_FOGLIO_TMP)
      For Each rng In .UsedRange.Resize(ColumnSize:=1)
        With rng
          Call .Offset(ColumnOffset:=1).Copy
          Call Application.Worksheets(sMOD_FOGLIO) _
            .Range(.Value).PasteSpecial( _
                Paste:=xlFormats _
              , Operation:=xlNone _
              , SkipBlanks:=False _
              , Transpose:=False)
        End With
      Next
      Let Application.DisplayAlerts = False
      Call .Delete
      Let Application.DisplayAlerts = True
    End With
    Let .CutCopyMode = False
  End With
End Sub
Se vuoi che la routine "ImpostaPrimaDiStampa" venga avviata ogni volta che
stampi puoi farla chiamare dall'evento "Workbook_BeforePrint" di
ThisWorkbook, cosi':
Option Explicit
Private Sub Workbook_BeforePrint( _
  Cancel As Boolean _
)
  Call ImpostaPrimaDiStampa
End Sub
--
Ciao.
Maurizio

 Grazie
Menu file
imposta pagina
foglio
sezione 'stampa'
attiva il checkbox 'bianco e nero'

 Devi configurare la stampante "stampa in scala di grigi".
Grazie Sergio,
ma purtroppo non funziona. Se metto il colore piů sbiadito, il giallo ad
esempio, quando stampo mi evidenzia con dei puntini l'area colorata. vorrei
invece che la parte colorata non comparisse per niente in fase di stampa.
Ciao
--
ŽFulmineŠ






 ha scritto nel messaggio
news:8b5uvr$927$1...@nslave2.tin.it...
Scusate per i 3 messaggi ma ieri alle 20.30 c'erano dei problemi con il
collegamento tin alle news.
--
®Fulmine©


 esempio:
Purtroppo ho utilizzato VBA solo 1 volta per inserire la mia firma
scannarizzata (perdonatemi il termine) nei documenti di word. Proverò anche
quanto mi hai gentilmente scritto nel messaggio precedente.
Provo ad esporti/vi il mio problema, forse ci sono altri metodi più semplici
per risolvere il caso. Ho un foglio di excell dove la persona che opererà
nell'inserimento dei dati non distingue le celle di inserimento, avevo
optato per il colore perché non ho trovato e non conosco altre soluzioni; mi
basterebbe anche posizionare, con il tasto tab, il cursore nella cella
giusta saltando quelle che non mi interessano. Concludendo, all'apertura del
foglio il cursore si posiziona nella cella a1, inserisco il dato, schiaccio
"tab" e il cursore mi va nella cella a5 anziché nella a2. Spero di essere
stato chiaro.
Ciao


 attiva il checkbox 'bianco e nero'
Purtroppo non funziona, come ho già detto a Sergio Nemec, anche se scelgo il
colore più sbiadito, oltre ai caratteri, mi stampa anche un rettangolo
chiamiamolo "ombreggiato" che non vorrei avere.


 stato chiaro.
Se le cose stanno cosi' direi che potresti proteggere il foglio. Devi
operare in questo modo: imposta il formato di ciascuna cella su sbloccata
togliendo la spunta dal CheckBox "Bloccata" che trovi seguendo il menu'
"Formato >Celle >Protezione" quindi col menu' "Strumenti >Opzioni >Proteggi
foglio... (Ok)" ottieni proprio il comportamento che hai descritto.
--
Ciao.
Maurizio

optato per il colore 
potrebbe essere un secondo foglio, in un altro documento o nello
stesso del primo, identico (copia/incolla) e in bianco e nero. nelle
celle interessate dall`inserimento, un riferimanto alle celle del
foglio `colorato` (non ci dovrebbero essere `casini`, sono celle con
le stesse coordinate, solo su fogli diversi, e quindi non avresti
difficolta` a inserire i fiferimenti giusti)
-- 
Ciao!
     Gian Matteo
Partecipa anche tu al SETI@home. Durante i tempi morti di uso del pc puoi 
aiutare il SETI a trovare prove di intelligenze extraterresti.
it.scienza.astronomia.seti -- 
http://setiathome.ssl.berkeley.edu/

 foglio... (Ok)" ottieni proprio il comportamento che hai descritto.
Ciao Maurizio,
lo immaginavo che c'erano soluzioni meno complicate, ma non sapevo quali:-).
Comunque ho provato a seguire il tuo consiglio, ma in "Strumenti >Opzioni "
La funzione Proteggi foglio non la trovo. Nel menů Strumenti ho l'opzione
"Protezione" con 3 sottomenů: Proteggi foglio...,Proteggi cartella di
lavoro... e Proteggi e condividi cartella di lavoro. Se vado su Proteggi
foglio mi si apre una cartella con tre richieste di
conferma:Contenuto,oggetti,scenari e una richiesta di password facoltativa.
Ho provato a smanettare con questi comandi ma non ho ottenuto nulla.
Potresti cortesemente pilotarmi passo-passo?
Grazie
--
ŽFulmineŠ


 difficolta` a inserire i fiferimenti giusti)
Ottima idea, però non vorrei creare confusione a chi deve utilizzare il
foglio. Dovrebbe inserire i dati nel foglio1 colorato, ma stampare il foglio
2 senza colori. Ripeto, ottimo suggerimento ma lo terrei come ultima
soluzione.
Grazie
--
®Fulmine©


 Potresti cortesemente pilotarmi passo-passo?
Capperi, hai ragione, scusami tanto: mi e' scappato un "Opzioni" al posto di
"Protezione"! Leggi:
Strumenti >Protezione >Proteggi foglio...
Appare la finestra di dialogo "Proteggi foglio":
Proteggi foglio di lavoro per
[v] Contenuti
[v] Oggetti
[v] Scenari
Password (facoltativa):
[__________________________]
[Ok]
Lascia tutto cosi' come sopra, senza farti tentare dalla password che poi e'
un casino gestirle se non se ne ha una reale necessita', e clicca su "Ok".
SE prima di questo avrai sbloccato le celle "di input" come descritto nel
msg precedente, potrai digitare solo in queste e spostarti da una all'altra
col tasto {TAB} o, all'indietro, con {MAIUSC}+{TAB}, proprio come se fossero
le "Caselle di testo" di una finestra.
--
Ciao.
Maurizio

 le "Caselle di testo" di una finestra.
Ciao Maurizio,
scusa se ti rispondo solo ora ma in questo periodo sono impegnato.
Ho provato ciò che mi hai suggerito e funziona egregiamente.
Grazie e ciao


2 senza colori. 
ma a quel punto fare un bottone nel foglio a colori che stampi quello
in bianco e nero lo faccio anche io che sono un ignorante di VB
(registro la macro e via...)


 (registro la macro e via...)
Ciao Gian Matteo,
ho risolto il tutto con l'aiuto di Maurizio Borrelli. Il problema non è
tanto mio ma della persona che deve utilizzare quel foglio, credimi se
incomincio a mettergli qualche cosa come i bottoni va in crisi profonda.
Purtroppo non tutti gli utilizzatori dei pc hanno un approccio costruttivo
verso questa tecnologia.
Ciao


verso questa tecnologia.
capisco, capisco... c`e` gente che si spaventa se cambi monitor al PC:
"ma adesso funziona ancora?` ... mammamia...! 
