| Pregunta: | 56761 - AJUSTAR ANCHURA DE CELDAS DE EXCEL |
| Autor: | Guillermo Aliaga |
| Hola amigos , Estoy dando formato a un archivo de excel, he logrado colocar el ancho a las celdas, el color backgorund, centrado de lineas, pero lo que no puedo hacer ajustar una columna de tal forma que si el texto sobrepasa el ancho de una celda, el texto restante baje automaticamente hacia abajo. Estoy usando los soguientes codigo: xlsub.Range("A1:AJ1").Interior.Color = RGB(255,0,0) xlsub.Range("A1:Aj1").Font.Bold = true xlsub.Range("A1:AJ1").Font.Size =8 xlsub.Range("A2:Z500").Font.Size =8 xlsub.Range("A1:Z500").Font.Name = "Tahoma" xlsub.cells[ll_r,ll_c_aux].ColumnWidth = li_ancho xlsub.cells[ll_r,ll_c_aux].HorizontalAlignment =2 xlsub.cells[ll_r,ll_c_aux].Merge //combinar celdas Me falta el comando para ajustar celdas. Espero alguien me la pueda proporcionar, Gracias anticipadas, Guillermo | |
| Respuesta: | Juan Gastelo |
| Guillermo, si aún no has encontrado la respuesta, prueba con esta sintaxis: .WrapText = True Saludos Juan | |