Excel le permite crear gráficos a todo color. Cuando esté listo para imprimir el gráfico, puede indicarle a Excel que lo imprima en «blanco y negro»

(a través de Archivo | Configuración de página | Gráfico | Imprimir en blanco y negro). Quizás se pregunte si hay alguna manera de exportar esta versión «en blanco y negro» del gráfico, de modo que pueda trabajar con él en un programa diferente.

La respuesta es que no puede hacer esto, al menos no directamente. Para comprender por qué ocurre esto, debe comprender cómo funciona la función «imprimir en blanco y negro». Esta función solo afecta lo que se envía al controlador de la impresora (a su impresora), no afecta en absoluto al gráfico real. Incluso cuando hace clic en Vista previa de impresión, no está viendo su gráfico real, sino una representación de cómo se verá su gráfico cuando se imprima. Por lo tanto, está viendo la salida de la impresora, no el gráfico real.

Si desea exportar una versión en blanco y negro de su gráfico, hay varias formas de realizar la tarea. La primera es simplemente ver el gráfico en Vista previa de impresión y hacer una captura de pantalla (presione Alt + Imprimir pantalla). Luego puede pegar la pantalla en su programa de gráficos favorito y retocarlo, como desee.

Si desea exportar el gráfico en lugar de solo capturar la pantalla, debe cambiar los colores del gráfico para que sean realmente en escala de grises y contengan los mismos patrones que vería si optara por imprimir en blanco y negro. Este enfoque realmente cambia el origen del gráfico, en lugar de depender de Excel para hacer una transformación del gráfico cuando imprime. Una vez que haya terminado de realizar los cambios de formato, puede incluso guardar el gráfico como un «tipo de gráfico» para que pueda usarlo como patrón para otros gráficos que cree.

Si lo desea, también puede utilizar una macro para convertir entre presentación de gráfico en color y escala de grises. Este enfoque depende en gran medida de los colores que desea usar en el gráfico, el tipo de gráfico que está usando y el número de series de datos en el gráfico. El siguiente es un ejemplo de una macro que alternará los colores en una serie de datos entre color y blanco y negro, para hasta cinco series de datos.

Option Explicit Public bColored As Integer

Sub ColoredToBW()

Dim cht As Chart     Dim chtSC As SeriesCollection     Dim x As Integer     Dim iSeriesCount As Integer     Dim iColors(1 To 5, 0 To 1) As Integer     Dim iColor As Integer

'Set colors for BW series     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%

'Set colors for Color series     iColors(1, 1) = 55 'Indigo     iColors(2, 1) = 7 'pink     iColors(3, 1) = 6 'yellow     iColors(4, 1) = 8 'Turquoise     iColors(5, 1) = 13 'Violet

'Toggle Color/BW change 0 to 1 or 1 to 0     bColored = 1 - bColored

Set cht = ActiveChart

'check that a chart is selected     If cht Is Nothing Then         MsgBox ("Select a chart")

Exit Sub     End If

Set chtSC = cht.SeriesCollection

'Check for MIN of number of series or     'colors and only do the minimum     iSeriesCount = Application.WorksheetFunction.Min _       (UBound(iColors), chtSC.Count)



For x = 1 To iSeriesCount         'Define the color         iColor = iColors(x, bColored)



'Set the LINE color         chtSC(x).Border.ColorIndex = iColor

'Marker color         With chtSC(x)

.MarkerBackgroundColorIndex = xlNone             .MarkerForegroundColorIndex = iColor         End With     Next x End Sub

Este ejemplo no funcionará con todos los tipos de gráficos; deberá modificarlo para que refleje sus necesidades. Sin embargo, servirá como punto de partida para crear su propia macro.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (2204) se aplica a Microsoft Excel 97, 2000, 2002 y 2003. Puede encontrar una versión de este consejo para la interfaz de cinta de Excel (Excel 2007 y posteriores) aquí:

link: / excelribbon-Exporting_Black_and_White_Charts [Exportación de gráficos en blanco y negro].