Jump to content

Aniversario


Snake

Recommended Posts

Hoy cumplo 1 año de estar registrado en este foro y me doy cuenta de que al paso del tiempo mi ignorancia aumenta.. Bueno, no aumenta, sólo me doy cuenta de que era mayor a lo que yo pensaba.. jaja.

Así que seguiré por acá tratando de reducirla..

Saludos a todos.

 

Link to post
Share on other sites

Te comprendo @Snake

Yo también me di cuenta cuando entre a este foro que me falta mucho por aprender, en estos momentos estoy pasando por una situación de que "no se me pega nada" jajaja, pero espero que mejore y hacer que esta falta de conocimientos cada día vaya disminuyendo. 

En este foro supe que existía With, Set, For Each...Colection

Y por eso aquí andamos... aparte que ando desempleado. Jajaja.

Saludos.

Link to post
Share on other sites
Hace 5 horas, Snake dijo:

Hoy cumplo 1 año de estar registrado en este foro y me doy cuenta de que al paso del tiempo mi ignorancia aumenta.. Bueno, no aumenta, sólo me doy cuenta de que era mayor a lo que yo pensaba.. jaja.

 FELIZ CUMPLEAÑOS SNAKE.. !

Me haces recordar los comentarios que yo hacía hace unos años..   incluso ya lo mío va para la próxima reencarnación, porque todo lo que me falta, no me dará esta vida para aprender.. jaja  ... ahora ya no digo nada, porque ya me acostumbré.. :ph34r: -_-

jaja

Link to post
Share on other sites

@Snake estimado pues te tengo buenas noticias!..., TODOS sin excepción ignoramos mucho... pero como notaras por aquí, andan muchos con su valiosa herramienta... si esa la que estas pensando "la bolita mágica", la que todo lo ve :D

Ya en serio aun que parezca absurdo, esa "bolita" si existe, pues con el tiempo obtienes la experiencia, es decir al mirar un problema, se te re memoriza el cerebro [comienza a recordar tantos temas/problemas/soluciones vistas y resueltas], que te manejas después, con mucha soltura; y bueno si supieras por donde ando, te preguntarías en serio tiene que ver con Excel:ph34r:

 

Saludos a todos

Link to post
Share on other sites

Archived

This topic is now archived and is closed to further replies.

a


  • Crear macros Excel

  • Posts

    • amigo, lamentablemente NO nos estamos entendiendo, tu quieres que la macro haga algo pero no terminas de explicar, lo mas que voy a hacer por ti es dejarte esta macro que hace lo mismo que tu macro original pero mucho mas resumida Sub correspondencia() Dim NumCriterios As Variant Dim nCantDatos As Double Dim nDatos As Double Dim wHoja As Worksheet Dim nVariable As Integer Dim sVariable As String Dim sDatos As String ' ' correspondencia Macro ' ' Acceso directo: CTRL+a ' ''''''''''''''''''pedimos la cantidad de crieterios ''''''''''''''''''''''''''''''''''''''''''''''''''''''' NumCriterios = InputBox("Escribe el número de criterios") 'Caja de texto para escribir el numero de criterios If IsNumeric(NumCriterios) = False Then Exit Sub '''''''''''''''''' obtenemos la cantidad de datos a procesar ''''''''''''''''''''''''''''''''''''''''''''''''''''''' nCantDatos = Sheets("BD").Cells(Rows.Count, "A").End(xlUp).Row 'contar el numero de nDatos For nDatos = 2 To nCantDatos 'Ciclo para realizar las combinaciones Worksheets("Correspondencia").Copy Before:=Sheets(nDatos) Set wHoja = ActiveSheet For nVariable = 1 To NumCriterios sVariable = Worksheets("BD").Cells(1, nVariable).Value sDato = Worksheets("BD").Cells(nDatos, nVariable).Value wHoja.Cells.Replace What:="<" & sVariable & ">", Replacement:=sDato, LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False 'Busca y reemplaza los valores de la base de nDatos Next nVariable Next nDatos End Sub   de resto no puedo ayudarte mas, pues tienes que ayudarme a entender para poder ayudarte, la macro supuestamente busca hasta 8 campos (tu macro original) en la tabla de la hoja DB, pero esa hoja solo tiene 2 campos nombre y nota, no veo el sentido de elegir 8 criterios cuando NO existen. y lo otro, dices que algunos no te cuadran, pero no dices cual para revisar. suerte  
    • Si disculpe, pero como lo digo solo eso necesito esa macro necesito que me replique la correspondencia pero hasta ahí funciona bien pero en la sumatoria en algunas correspondencias no lo suma bien solo eso el total sale distinto a los criterios.
    • Saludo amigo hace mes me ayudaste con este archivo que   ponga Trimestre i aparezca solo los meses Ene, Feb, Mar; Trimestre II aparezca solo Abril, May, Jun; Trimestre III aparezca solo Jul, Agos, Set; Trimestre IV aparezca solo Oct, Nov, Dic, se estuviera a su alcance me lo pudiera corregir solos que aparezcan por mes se pongo enero me aparezca solo enero y así sucesivamente con los otros meses gracias 
    • yo veo lo que hace la macro, simplemente hace una copia de la hoja Correspondencia y supuestamente sustituye los criterios o campos, pero en este caso simplemente cambia solo dos, <nombre> y <nota> y tu hablas hasta de 8 criterios, si puedes explicar lo que intentas hacer
    • @jeaa lamentablemente NO puedo bajar videos, mi internet no es muy buenos y no tengo casi datos  
  • Recently Browsing

    No registered users viewing this page.

×
×
  • Create New...

Important Information

Privacy Policy