Eksport Black and White Charts

November 4  by Eliza

Excel kan du lage diagrammer i full farge. Når du gjør deg klar til å skrive ut diagrammet, kan du instruere Excel til å skrive den i "black and white" (i kategorien Chart av dialogboksen Sideoppsett). Du lurer kanskje på om det er en måte å eksportere denne "black and white" versjon av oversikten, slik at du kan jobbe med det i et annet program.

Svaret er at du ikke kan gjøre dette, i alle fall ikke direkte. For å forstå hvorfor dette er, må du forstå hvordan "skrive ut i svart og hvitt" -funksjonen fungerer. Denne funksjonen bare påvirker hva som sendes til skriverdriveren (til skriveren), det påvirker ikke selve diagrammet i det hele tatt. Selv når du bruker Print Preview, er du ikke ser på ditt faktiske diagrammet, men en representasjon av hva diagrammet vil se ut når de skrives ut. Dermed ser du skriver utgang, ikke den virkelige diagrammet.

Hvis du ønsker å eksportere en svart og hvit versjon av diagrammet, er det flere måter å utføre oppgaven. Den første er å bare se diagrammet i forhåndsvisning og gjøre et skjermbilde (trykk Alt + Print Screen). Deretter kan du lime skjermen inn din favoritt grafikk program og røre det opp, som ønsket.

Hvis du ønsker å eksportere tabellen i stedet for bare å fange skjermen, bør du endre fargene på diagrammet slik at de virkelig er gråtoner og inneholde de samme mønstrene du vil se om du velger å skrive ut i svart og hvitt. Denne tilnærmingen faktisk endrer kilden for diagrammet, heller enn å stole på Excel for å gjøre en transformasjon av diagrammet når du skriver ut. Når du blir ferdig med å gjøre formateringsendringene, kan du selv lagre diagrammet som en "diagram mal" slik at du kan bruke den som et mønster for andre diagrammer du oppretter.

Hvis du vil, kan du også bruke en makro til å konvertere mellom farge og gråtoner diagram presentasjon. Denne tilnærmingen er svært avhengig av hvilke farger du vil bruke i diagrammet, diagramtypen du bruker, og antall dataserier i diagrammet. Følgende er et eksempel på en makro som vil veksle fargene i en dataserie mellom farger og svart-hvitt, for opp til fem dataseriene.

Option Explicit
Offentlig bColored As Integer

Sub ColoredToBW ()
Dim CHT Som Chart
Dim chtSC Som SeriesCollection
Dim x As Integer
Dim iSeriesCount As Integer
Dim iColors (1 til 5, 0 For å 1) As Integer
Dim iColor As Integer

'Angi farger for BW serien
iColors (1, 0) = 1 'Black
iColors (2, 0) = 56 'Gray-80%
iColors (3, 0) = 16 'Gray-50%
iColors (4, 0) = 48 'Gray-40%
iColors (5, 0) = 15 'Gray-25%

'Angi farger for Color serien
iColors (1, 1) = 55 'Indigo
iColors (2, 1) = 7 'rosa
iColors (3, 1) = 6 'gul
iColors (4, 1) = 8 'Turquoise
iColors (5, 1) = 13 'Violet

'Toggle Farge / BW endring fra 0 til 1 eller 1 til 0
bColored = 1 - bColored

Satt cht = ActiveChart

"Sjekke at et diagram er valgt
Hvis cht Er Ingenting Deretter
MsgBox ("Velg et diagram")
Exit Sub
End If

Satt chtSC = cht.SeriesCollection

'Se etter MIN av antall serier eller
'Farger og bare gjøre minimum
iSeriesCount = Application.WorksheetFunction.Min _
(UBound (iColors), chtSC.Count)

For x = 1 Til iSeriesCount
'Definer farge
iColor = iColors (x, bColored)

'Sett LINE farge
chtSC (x) .Border.ColorIndex = iColor

'Marker farge
Med chtSC (x)
.MarkerBackgroundColorIndex = XlNone
.MarkerForegroundColorIndex = IColor
Avslutt med
Neste x
End Sub

Dette eksempelet vil ikke fungere med alle typer diagram; du trenger å endre den til å reflektere dine behov. Det vil imidlertid tjene som et utgangspunkt for å lage en egen makro.

ExcelTips er din kilde for kostnadseffektiv Microsoft Excel trening. Dette tipset (10447) gjelder for Microsoft Excel 2007 og 2010. Du kan finne en versjon av dette tipset for den eldre menygrensesnittet av Excel her: Eksportere Svart og hvitt Charts.