Sp y Recordset - variant - ordenar por pertinencia

Error en Aplication.Ontime

Estimados todos, Tengo el siguiente código en ThisWorkbook Private Sub Workbook_Open() Dim Fila As Byte Dim Dias As Variant Dias = Array("DOM", "LUN", "MAR", "MIE", "JUE", "VIE", ...

Mensaje publicado en el 03/08/2005 - 00:37

AYUDA URGENTE, PLS

Estimados todos, Tengo el siguiente código en ThisWorkbook Private Sub Workbook_Open() Dim Fila As Byte Dim Dias As Variant Dias = Array("DOM", "LUN", "MAR", "MIE", "JUE", "VIE", ...

Mensaje publicado en el 02/08/2005 - 20:01

Valor de variables.

Buenas tardes. Tengo unas variables levantiscas. Recogen datos del tipo Código de documento, fecha y valor del documento. Quería declararlas como Single, pero si lo hago, con las instrucciones siguientes: If variable = "" ...

Mensaje publicado en el 15/07/2005 - 22:59

Seleccionar un txt y convertirlo a xls

Hol a todos, estoy desarrolando un macro para abrir un archivo (*.txt) en un directorio concreto y quisiera que convirtiera directamente ese archivo a formato excel sin necesidad de que me pregunte la forma de convertirlo (delimitado por comas, ...

Mensaje publicado en el 09/07/2005 - 21:58

Depurando mi codigo

Hola a todos, actualmente en el macro Auto_Open() tengo: dim hoja As Worksheet For Each hoja In ThisWorkbook.Worksheets If hoja.Name <> "CAPTURA" And hoja.Name <> "CONTROL" _ And hoja.Name <> ...

Mensaje publicado en el 07/07/2005 - 22:26

Necesito ayuda de kl

Disculpa nuevamente he tratado de enviarte la hoja que hice con el macro que me has enviado a esta direccion NOSPAMlapink2000@PLEASEhotmail.com pero me la ha rechazado varias veces.He hecho todo como dijiste pero al llegar a presionar Ctrl + F8 no ...

Mensaje publicado en el 31/05/2005 - 14:59

Necesito ayuda de kl

Disculpa nuevamente he tratado de enviarte la hoja que hice con el macro que me has enviado a esta direccion NOSPAMlapink2000@PLEASEhotmail.com pero me la ha rechazado varias veces.He hecho todo como dijiste pero al llegar a presionar Ctrl + F8 no ...

Mensaje publicado en el 31/05/2005 - 14:59

error argumento no valido

hola grupo... este es un codigo que copie del foro para graficas en formulario con office-web-components pero al ejecutarlo me sale error en la linea .Cells(Fila - 6, Col - 1) = Dato argumento no valido el codigo completo es : Sub Actualiza() ...

Mensaje publicado en el 03/05/2005 - 22:57

Crear directorios desde VBA

Buenas foro, tengo en una hoja un boton con un codigo asociado que se supone al pulsar sobre el boton comprueba si existe un directorio llamado 2005 y si no existe lo crea. Si existe, comprueba que dentro de el exista otro subdirectorio con el mes ...

Mensaje publicado en el 03/05/2005 - 11:12

Gráfico en formulario tomando datos de una hoja

Hola a tod@s, llevo toda la mañana peleandome con esto y no doy con la tecla, estoy intentando mostrar un gráfico en unformulario, basado en datos de una hoja, siguiendo las indicaciones de Hector Miguel en hilos anteriores he llegado ...

Mensaje publicado en el 26/04/2005 - 12:38

ayuda por favor

hola gente !! hay alguien que me pueda dar una mano con esto ?\ me lo están pidiendo en mi trabajo y la verdad que no tengo ni idea de por donde comenzar, además de muy pocos conocimientos de excel a este nivel :(( desde ya muchas ...

Mensaje publicado en el 14/04/2005 - 15:56

ocultar y borrar filas

hola grupo !! tengo la siguiente rutina que utlizo para ocultar las filas que en determinado rango tienen valor cero\ (la rutina se ejecuta al activar la hoja del libro) Dim Celda As Range, Temp As Variant For Each Celda In ...

Mensaje publicado en el 13/04/2005 - 18:05

Correccion de errores

Quisiera que me facilitaran una correccion de errores para esta macro, que pone el resultado de un objetivo buscado en una celda. Gracias anticipadas Pepe Frasquet Sub Resolverincognita() ' ' Resolverincognita Macro ' Macro grabada el 28/12/2004 ...

Mensaje publicado en el 13/02/2005 - 22:09

Búsqueda de texto en un bucle

Saludos Tengo el siguiente código: Dim I As Variant For I = 0 To wrd.ActiveDocument.Tables.Count 'primer sección Selection.Find.ClearFormatting 'segunda sección Selection.Find.Text = "Nombre" Selection.Find.Text = ...

Mensaje publicado en el 07/02/2005 - 21:36