Skip to main content
añadiendo imágenes
Origen Enlace
Esei
  • 3.9k
  • 1
  • 10
  • 14

Deseo crear un formulario para poder recorrer fila por fila una hoja en Excel y mostrar los valores en otra.

Esta es la hoja donde quiero mostrar los datos usando el botón "siguiente". Cada vez que haga clic deseo que recorra los datos de la Hoja 2 [![Hoja 1][1]][1]

introducir la descripción de la imagen aquí

esta es la Hoja 2, de donde voy a obtener los datos [![Hoja 2][2]][2]

introducir la descripción de la imagen aquí

Utilicé este código pensando en que funcionaria, pero siempre se queda en el segunda fila (Mónica Rojas Varilla 2 2 2 2 2 2 2 2 2)

Sub siguiente()
Dim fila As Integer
Sheets("Hoja 2").Select
Cells(3, 2).Select
fila = ActiveCell.Row
If fila > 3 Or fila = 3 Then
fila = fila + 1
Range(Cells(fila, 2), Cells(fila, 11)).Copy
Sheets("Hoja 1").Select
Range("B9:k9").PasteSpecial xlPasteValues

End If

End Sub

Gracias por sus respuestas!!! [1]: https://i.sstatic.net/oLxFU.jpg [2]: https://i.sstatic.net/B2QCa.jpg

Deseo crear un formulario para poder recorrer fila por fila una hoja en Excel y mostrar los valores en otra.

Esta es la hoja donde quiero mostrar los datos usando el botón "siguiente". Cada vez que haga clic deseo que recorra los datos de la Hoja 2 [![Hoja 1][1]][1]

esta es la Hoja 2, de donde voy a obtener los datos [![Hoja 2][2]][2]

Utilicé este código pensando en que funcionaria, pero siempre se queda en el segunda fila (Mónica Rojas Varilla 2 2 2 2 2 2 2 2 2)

Sub siguiente()
Dim fila As Integer
Sheets("Hoja 2").Select
Cells(3, 2).Select
fila = ActiveCell.Row
If fila > 3 Or fila = 3 Then
fila = fila + 1
Range(Cells(fila, 2), Cells(fila, 11)).Copy
Sheets("Hoja 1").Select
Range("B9:k9").PasteSpecial xlPasteValues

End If

End Sub

Gracias por sus respuestas!!! [1]: https://i.sstatic.net/oLxFU.jpg [2]: https://i.sstatic.net/B2QCa.jpg

Deseo crear un formulario para poder recorrer fila por fila una hoja en Excel y mostrar los valores en otra.

Esta es la hoja donde quiero mostrar los datos usando el botón "siguiente". Cada vez que haga clic deseo que recorra los datos de la Hoja 2

introducir la descripción de la imagen aquí

esta es la Hoja 2, de donde voy a obtener los datos

introducir la descripción de la imagen aquí

Utilicé este código pensando en que funcionaria, pero siempre se queda en el segunda fila (Mónica Rojas Varilla 2 2 2 2 2 2 2 2 2)

Sub siguiente()
Dim fila As Integer
Sheets("Hoja 2").Select
Cells(3, 2).Select
fila = ActiveCell.Row
If fila > 3 Or fila = 3 Then
fila = fila + 1
Range(Cells(fila, 2), Cells(fila, 11)).Copy
Sheets("Hoja 1").Select
Range("B9:k9").PasteSpecial xlPasteValues

End If

End Sub

Gracias por sus respuestas!!!

Origen Enlace

Crear un botón para recorrer fila por fila una hoja y mostrarla en otra en excel usando macros

Deseo crear un formulario para poder recorrer fila por fila una hoja en Excel y mostrar los valores en otra.

Esta es la hoja donde quiero mostrar los datos usando el botón "siguiente". Cada vez que haga clic deseo que recorra los datos de la Hoja 2 [![Hoja 1][1]][1]

esta es la Hoja 2, de donde voy a obtener los datos [![Hoja 2][2]][2]

Utilicé este código pensando en que funcionaria, pero siempre se queda en el segunda fila (Mónica Rojas Varilla 2 2 2 2 2 2 2 2 2)

Sub siguiente()
Dim fila As Integer
Sheets("Hoja 2").Select
Cells(3, 2).Select
fila = ActiveCell.Row
If fila > 3 Or fila = 3 Then
fila = fila + 1
Range(Cells(fila, 2), Cells(fila, 11)).Copy
Sheets("Hoja 1").Select
Range("B9:k9").PasteSpecial xlPasteValues

End If

End Sub

Gracias por sus respuestas!!! [1]: https://i.sstatic.net/oLxFU.jpg [2]: https://i.sstatic.net/B2QCa.jpg