Search each

722 resultados
Ordenar por fecha - Ordenar por pertinencia
Todos (722)
Prensa (19)
Foros (700)
Videos (3)
 
Otros resultados también están disponibles en nuestros foros :
Copiar filas de un DataTable a otro
Hola amigos. Estoy intentando copiar algunas filas desde un datatable a otro con el fin de "Updatear" a continuación un SQLDataAdapter. El mecanismo que utilizo es el siguiente: For Each RowProducto In ProductosActualizar.Rows ...
Mensaje publicado en el 07/09/2006 - 16:42
¿Porque no funciona este codigo?
=Dim Col As Byte, Celda As Variant Col = 1 For Each Celda In ThisWorkbook.Worksheets("Factura").Range("Cantidad").Value .Offset(UltimaFilaPFacts, Col + 1).Value = Celda.Value Col = Col + 3 Next = Gracias.
Mensaje publicado en el 31/08/2006 - 19:06
eliminar filas vacias
tengo algunos problemillas con un codigo que estoy utilizando para eliminar filas vacias, de un total de 25155 que tengo en la hoja de calculo: Sub depurar() '[a1].Select For i = 1 To 28155 If Cells(i, 1).Text = "" Then Cells(i, ...
Mensaje publicado en el 26/08/2006 - 00:53
ELIMINAR TODAS LAS HOJAS EXCEPTO "HOJA1" CON MACRO
Buenos días grupo, Estoy intentando crear una macro que borre todas las hojas de un libro excepto "Hoja1" con el siguiente código pero a parece un error: ' 'ELIMINAR TODAS LAS HOJAS EXCEPTO HOJA1 Sub ELIMINA_HOJAS() Dim ws ...
Mensaje publicado en el 25/08/2006 - 11:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
nombre de objetos System.Windows.Forms.MenuItem
Hola todos, es para preguntar cómo obtengo el nombre de cada uno de los elementos System.Windows.Forms.MenuItem de un System.Windows.Forms.MainMenu. inicialmente he hecho un procedimiento para recorrer el arbol de menú pero no ...
Mensaje publicado en el 09/08/2006 - 17:01
Listado de archivos de una carpeta (modificar el código expuesto)
Hola, tengo este código (sacado en este foro) para extraer los nombres de los archivos alojados en una carpeta pero quiero que la ruta del directorio sea la que escribo en la celda B1 de la 'Hoja1' y los archivos que quiero ver sean las ...
Mensaje publicado en el 08/08/2006 - 21:39