|
|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - LUKER
1
« en: Viernes 3 de Diciembre de 2004, 23:50 »
 Y yo la de google por su facilidad de busqueda
2
« en: Viernes 3 de Diciembre de 2004, 23:48 »
Ami en expecial me gusta todas un poco, aunque me gusta un poco mas la religiasa y el rock. Sobre todo tocarlo ya que soy bajista en un grupo 
3
« en: Viernes 3 de Diciembre de 2004, 23:42 »
Tengo bastante tienpo trabajando en aplicaciones y lo que tu piedes es casi imposible. Lo que puedes hacer son dos cosa 1 el codigo que necesita que se realice enla hoja lo colocas en un procedimiento y lo llamas despues del add . 2 tienes una hoja base la cual le das un salvar como(Por codigo) en donde pides el nombre de tu nueva hoja , como lo salvas en otra posicion tu hoja tendra todos los atributos de las anterior pero con la diferencia de que es una nueva hoja. Esta nueva hoja la cargas en tu proyecto (Todo por codigo). Es facil solo intentalo 
4
« en: Viernes 3 de Diciembre de 2004, 23:36 »
 A preguntas claras respuestas claros  Explicate mejor ok 
5
« en: Jueves 11 de Noviembre de 2004, 18:52 »
Ok, pero aun asi si tu programa se encuentra en modo de ejecucion podrias utilizar esos parametros pero con un poco de ingenio. por ejemplo tu bloque de programa se llama Luker y si pones Luker/C cambiar color de fondo, sino dice Luker/D cambia la letra, lo que yo haria seria que llamaria a mi procedure Luker en este caso y como parametro le mandaria el /C o /D leyendolo desde cualquier medio de entrada, una vez recibido los datos solamento comparo que si algunas de estas intruciones que digite se encuentran en una de las mias y si es asi que el programa realice x accion, podria con un case o algo asi por el estilo para que me haga las diferentes aciones y listo 
6
« en: Jueves 11 de Noviembre de 2004, 18:29 »
Bueno al final y al cabo llegamos a una linda conclucion y ya sabemos campos y registros son totalmente diferentes 
7
« en: Jueves 11 de Noviembre de 2004, 15:04 »
Amigo tu problema como dijo se encuentra en la linea If Combo1.AddItem(vista.Fields(1)) <> 0 Then
. Debido a que tu verificas que el combo se encuentre vacio y no lo estas haciendo directamente en el registro con el codigo de rojo If vista.Fields(1) <> 0 Then
lo colocas como te dijo rojo y agregas el registro.  Es muy sencillo, no como para expertos pero yay que podemos hacer  Bien por ti Rojo
8
« en: Miércoles 10 de Noviembre de 2004, 17:33 »
Le di mi voto a nirvana pero mi banda favorita es el mago de oz
9
« en: Miércoles 10 de Noviembre de 2004, 17:28 »
Bueno creo que es algo un poco curioso, pero todo sigue igual, si existen bueno y si no, es que no fueron tan cargas como nosotros los humanos puros. Somos la Especie dominante  ah y no se aleja mucho de la teoria de Darwin de evolucion territorial, es lo mismo pero diferente ah caray 
10
« en: Miércoles 10 de Noviembre de 2004, 17:22 »
Y despues llegara satanas y nos cogera
11
« en: Miércoles 10 de Noviembre de 2004, 17:14 »
Bueno tengo uno mas : Amaras a tu computador con todas tus fuerzas y con todo tu corazon y dejaras de estar vago hoy. 
12
« en: Miércoles 10 de Noviembre de 2004, 17:03 »
Amigo los parametros los puedes mandar de funcion o procedure igual como se hace en pascal o en C, para parametros por valor solo colocas el nombre de tu funcion y tu parametro con todo y tipo ej: sub perdon( a as integer) y para parametros por referencia lo mismo pero con dim ej: sub perdon( dim a as integer). Bueno chao y portate bien bueno mas o menos
13
« en: Miércoles 10 de Noviembre de 2004, 16:34 »
oh fabuloso me parece su idea voy a provar
14
« en: Miércoles 10 de Noviembre de 2004, 16:30 »
No se te olvide ambas opciones deben ser fuera de tu bucle
15
« en: Miércoles 10 de Noviembre de 2004, 16:28 »
Amigo disculpa pero creo que debes explicarte un poco mejor, en fin un error que suele suceder si te entendi es cuando guardamos archivos de manera consecutiva y no estamos seguros de que tienen un nombre diferente, lo que puedes hacer es que a la hora de salvar te acegures que el nombre del archivo que intentas salvar, no sea igual a uno previamente almacenado, lo que te recomiendo hacer seria pedirle el nombre del archivo al final del bucle tu sabras como o simplemente puedes probar con este framento de tu codigo xWord.ActiveDocument.SaveAs "c:\plantillas\tp" & File2.FileName colocando al final de tu busqueda de registro, aunque quedaria con el nombre del ultimo registro o archivo buscado. Espero haberte podio ayudar, aunque sea lo intente. Cualquier cosa avisanos Me voy de fiesta  
16
« en: Miércoles 10 de Noviembre de 2004, 15:56 »
Amigo te recomiendo que carges o utilices algun componente de sonido, los clasicos de siempre, es mas hay un ejemplo en el ms, despues llama o tu archivo pero cargalo desde el focus para que cada vez que hagas algo sobre el que contiene el focus se reprodusca tu sonido. tambien puedes usar windows media y lo dejas invisible y lo activas cuando hagas x tarea  Bueno es una idea no
17
« en: Miércoles 10 de Noviembre de 2004, 15:47 »
18
« en: Viernes 29 de Octubre de 2004, 15:55 »
Creo que para ese año el internet todavia existira pero de una manera diferente, sera para la mayoria de la poblacion la fuente de informaon(por que hoy dia del todo no es asi), en ese año me veo en mi casa con mi vieja haciendo algunos programas por entrenimiento(espero estar pencionado) y vivir la vida lo mas lindo y tranqui del mundo, de ves en cuando ayudando a la gente en solocodigo siendo seguramente todo un experto en lenguajes. Solocodigo creo que sera uno de los foros mayor visitados y tendra de todos los tipos de programa del momento y toda una galeria de recuerdos aunque para conectarce puede ser,podriamos tener las charlas de manera mas real viendonos por aparatos que personifique nuestra apareencia,(realida virtual)., Bueno esto es en general lo que pienso.  Feliz dia de brujas
19
« en: Viernes 29 de Octubre de 2004, 15:36 »
Aun asi te sale muy caro por que me tienes que pagar el aire 
20
« en: Viernes 29 de Octubre de 2004, 00:04 »
Hola amigo despues de todo un dia y medio lo logre y quiciera que si alguien tuviera la misma duda observara lo que realice, me costo mucho pero logre mi cometido, por cierto gracias a los que lo intentaron o aunque sea leyeron mi duda. Bueno chao.  Private Sub CommandButton17_Click() ' Dim i As Integer Dim Lar As Integer Dim Ini As Integer Dim Largo As Integer Dim Nombre As String Application.ScreenUpdating = False Sheets.Add ChDir _ "C:\Documents and Settings\jocata\Escritorio\programa\prueva\S.T BARRANCA\CIRCUITO BARRANCA\AÑO 2004\" miarchivo = Application.GetOpenFilename("Archivo de Datos,*.xls") Workbooks.OpenText Filename:=miarchivo Sheets("fuente").Select ActiveWindow.ScrollWorkbookTabs Position:=xlLast ActiveWindow.ScrollWorkbookTabs Position:=xlLast ActiveWindow.ScrollWorkbookTabs Position:=xlLast Nombre = ActiveWindow.Caption Sheets("fuente").Select Range("C1:K2").Select Selection.Copy Windows("maestrov7.xls").Activate Range("B3").Select ActiveSheet.Paste Windows(Nombre).Activate Range("C3:C98").Select Application.CutCopyMode = False Selection.Copy Windows("maestrov7.xls").Activate Range("B5").Select ActiveSheet.Paste ActiveWindow.Close ActiveWindow.SmallScroll Down:=-9 ActiveWindow.SmallScroll Down:=-384 Range("A1").Select ' todo esto se pone en un while para varios archivos End Sub ' y con este salve los cambios y cerre todo. Private Sub CommandButton18_Click() ActiveWorkbook.Close ActiveWorkbook.Close Savechanges:=True ActiveWorkbook.Close (True) End Sub
21
« en: Jueves 28 de Octubre de 2004, 19:23 »
Hola como estan si alguno de ustedes me quiere regalar una invitacion se lo agradecia, pueden mandarla a Luker_88@hotmail.com, gracias de antemano.
22
« en: Jueves 28 de Octubre de 2004, 19:03 »
Luker
23
« en: Jueves 28 de Octubre de 2004, 18:52 »
24
« en: Jueves 28 de Octubre de 2004, 18:47 »
Estoy de acuerdo las patentes no son nada provechosas, al final y al cabo a uno siempre le roban el trabajo.  que mas da 
25
« en: Jueves 28 de Octubre de 2004, 17:43 »
En el caso mio es por que me encanta lo mitologico, lo ireal para los demas, pero que para mi puede llegar hacerlo real en mi corazon, en cuanto a mi firma creo que todo se puede realizar en la vida (y en la programacion), si no que somos nosotros mismos los que nos ceramos o no tenemos la suficiente confianza como para intentarlo.
|
|
|
Mostrar Mensajes
