Estimado muchas gracias por la explicación, pero podrias explicarme como hago para seleccionar esa ultima fila tomando en cuenta que no todas las celdas de esa tabla estan llenas
Hola eso lo puse como ejemplo, sirve para que no haya unos parpadeos que se dan cuando trabajas con varias hojas en una macro, ya que cuando se trabaja con varias hojas en una macro eso parpadeos de pantalla resultan visualmente incómodos
Dim WSE As Worksheet Dim UltFila As Long, UltColumna As Long Dim Lo As ListObject Set WSE = Worksheets("Ejemplo") UltFila = WSE.Cells(Rows.Count, 1).End(xlUp).Row UltColumna = WSE.Cells(1, Columns.Count).End(xlToLeft).Column Set Lo = WSE.ListObjects.Add(xlSrcRange, Cells(1, 1).Resize(UltFila, UltColumna), , xlYes) ' Lo.Name = "" Lo.TableStyle = "TableStyleLight9" Lo.ShowTableStyleColumnStripes = True
Excelente explicación, es posible entender el concepto claramente, Muchas gracias
Eres GRANDE Amigo. Gracias por el Video
Muchas gracias Sr.Mendoza por sus explicaciones y sus claros ejemplos.
Excelente amigo. Es una explicación concisa. Gracias.
Muyu buena explicacion. Muchas gracias por aclarar mi duda
Muchas Garcias , Thank you , Shie Shie , Todá Rabá , por la lección excelente material.
Estimado muchas gracias por la explicación, pero podrias explicarme como hago para seleccionar esa ultima fila tomando en cuenta que no todas las celdas de esa tabla estan llenas
Gracias por compartir tus conocimientos. Consulta, ¿Para que me sirve deshabilitar las actualizaciones de pantalla?
Hola eso lo puse como ejemplo, sirve para que no haya unos parpadeos que se dan cuando trabajas con varias hojas en una macro, ya que cuando se trabaja con varias hojas en una macro eso parpadeos de pantalla resultan visualmente incómodos
Gracias por la ayuda perfectamente entendido y aplicado.
Hola hay una manera de seleccionar toda la ultima fila de la tabla y copiarla para pegarla en un otra tabla?
Tengo una planilla con captura de datos y quiero copiar esos datos a otra planilla a partir de la ultima fila con datos como lo hago!
amigo, con ese codigo despues como puedo crear una tabla?
ruclips.net/video/eAWKNsaJcxE/видео.html
Dim WSE As Worksheet
Dim UltFila As Long, UltColumna As Long
Dim Lo As ListObject
Set WSE = Worksheets("Ejemplo")
UltFila = WSE.Cells(Rows.Count, 1).End(xlUp).Row
UltColumna = WSE.Cells(1, Columns.Count).End(xlToLeft).Column
Set Lo = WSE.ListObjects.Add(xlSrcRange, Cells(1, 1).Resize(UltFila, UltColumna), , xlYes)
' Lo.Name = ""
Lo.TableStyle = "TableStyleLight9"
Lo.ShowTableStyleColumnStripes = True
Como cuento las columnas a la derecha?!!