Hola Sergio, buenas tardes. He sido un apasionado de Excel durante mucho tiempo. En mi circulo de amigos soy considerado como un " Mago " del excel, por supuesto nunca me lo he creído, es más no soy creído por nada, y menos con esta aplicación porque se lo amplio y extenso que es. Hace un tiempo le decía a mis amigos que tal vez manejaba un 25%de esta aplicación. pero cada vez que aprendo más se, que menos se y hoy pienso que no alcanzo a conocer el 2% de la misma. Triste realidad pero así es. A través del tiempo de estudio de excel, creo tener un poco más de 1.700 links de diferentes personas que como tú se dedican a compartir conocimiento en UA-cam, todos excelentes conocedores del tema, realmente buenos y muy buenos, con un compromiso de su misión a toda prueba. Hoy me he encontrado con tu canal y quiero felicitarte y darte un millón de gracias por tu aporte, solo he visto un par de vídeos tuyos y creo que está fuera de serie, expones temas diferentes, muy didácticos muy claros, concisos, agradables y útiles. Por supuesto tienes tu ¡ Manito Arriba !, no dudo en suscribirme ty estaré escudriñando mas información tuya. Volveré con algún comentario, espero mucho más corto, pero valía la pena hacerte un reconocimiento por tu trabajo. Somos especialistas en la crítica destructiva pero nos preocupamos poco cuando se trata de alabar, reconocer y construir. Te deseo millones de éxitos y ha partir de hoy me convertiré en un gran seguidor tuyo. Saludos Humberto
Te agreadezco los comentarios, y me alegrea que mi material pueda servirte para que cada vez seas mejor profesional. Agradecería mucho que recomiendes este canal a las personas que sepas que pueden aprovechar mis ejemplos. Un saludo.
Excelente Sergio, muy bien explicado. Solo que me quede con una duda, ya que estamos haciendo una función personalizada, no me gusto que siguiera saliendo el error al no encontrar un espacio en la celda e hice esta modificación: Function PrimeraPalabra(Celda As Range, Optional Convertir As Integer) 'Declarar variables Dim intEspacio As Integer Dim strPalabra As String 'Le decimos a Excel que la función se calcule automáticamente Application.Volatile
For intEspacio = 1 To Len(Celda) If Mid(Celda, intEspacio, 1) = " " Then Exit For End If Next strPalabra = Left(Celda, intEspacio - 1) '1 = MAYÚSCULAS '2 = minúsculas 'Omitir = la primera palabra sin cambios Select Case Convertir Case Is = 1 PrimeraPalabra = UCase(strPalabra) Case Is = 2 PrimeraPalabra = LCase(strPalabra) Case Is = Empty PrimeraPalabra = strPalabra End Select End Function Con esto ya no te da Error. Una pequeña contribución!!!
waoooooooooooooooo excelente SERGIO y dime y demas UDF'S ?, seria genial que hagas mas tutos o pongas a la venta para bajarlos,,,explicas muy bien amiguito,,,de antemano te agradezco , eres un cielo....
Cuando no se tiene un rango de celdas elegido funcionan de la misma manera, eligen un rango. Pero hay una diferencia cuando se tiene un rango seleccionado. Prueba la siguiente macro y comentas si encuentras la diferencia: Sub test() Sheets(1).Activate Range("A4:D10").Select Range("C5").Activate End Sub
Excelente video, pregunto ¿Cómo puedo hacer para que mi función esté disponible en cualquier libro de excel que yo abra y no solamente en el libro en el que la cree?
Hola Buen tuto, pero tengio una duda, hay forma de crear una UDF con "Application.WorksheetFunction.RoundUp(V1,V2)" donde: V1 = Celda a Redondear V2 = valor a redondear en este caso seria -2 y que a su vez me transforme a texto dando como resultado "$ #,#.00" habra algo asi? bueno es que yo aqui en administracion empleo anidar funciones pero seria mas practico en una sola hacer eso.. mi proceso es: =texto(redondear.mas(celda,-2),"$ #,#.00") gracias por tu apoyo! quedo pendiente.
Hola. Con eso demuestro que podemos trabajar con funciones de Excel y UDF. Al final tenemos la decisión de hacerlo así o meter el IFERROR dentro de la UDF.
Gracias Sergio ,soy tu fan .
Hola Sergio, buenas tardes.
He sido un apasionado de Excel durante mucho tiempo.
En mi circulo de amigos soy considerado como un " Mago " del excel, por supuesto nunca me lo he creído, es más no soy creído por nada, y menos con esta aplicación porque se lo amplio y extenso que es. Hace un tiempo le decía a mis amigos que tal vez manejaba un 25%de esta aplicación. pero cada vez que aprendo más se, que menos se y hoy pienso que no alcanzo a conocer el 2% de la misma. Triste realidad pero así es.
A través del tiempo de estudio de excel, creo tener un poco más de 1.700 links de diferentes personas que como tú se dedican a compartir conocimiento en UA-cam, todos excelentes conocedores del tema, realmente buenos y muy buenos, con un compromiso de su misión a toda prueba. Hoy me he encontrado con tu canal y quiero felicitarte y darte un millón de gracias por tu aporte, solo he visto un par de vídeos tuyos y creo que está fuera de serie, expones temas diferentes, muy didácticos muy claros, concisos, agradables y útiles. Por supuesto tienes tu ¡ Manito Arriba !, no dudo en suscribirme ty estaré escudriñando mas información tuya. Volveré con algún comentario, espero mucho más corto, pero valía la pena hacerte un reconocimiento por tu trabajo. Somos especialistas en la crítica destructiva pero nos preocupamos poco cuando se trata de alabar, reconocer y construir.
Te deseo millones de éxitos y ha partir de hoy me convertiré en un gran seguidor tuyo.
Saludos
Humberto
Te agreadezco los comentarios, y me alegrea que mi material pueda servirte para que cada vez seas mejor profesional. Agradecería mucho que recomiendes este canal a las personas que sepas que pueden aprovechar mis ejemplos. Un saludo.
Es un tema muy interesante lo de las Funciones Personalizadas por el Usuario, en inglés UDF (User-Defined Functions)
Pulgar Arriba!!!
me acabo de instalar su complemento por eso estoy en el video
Excelente Sergio! Muy bueno el video
Gracias Sergio, la verdad no sabia de los UDF, pero veo que hay mucho que aprender para ser mas productivos en nuestro trabajo diario.
Excelente, Sergio. Gracias por este video.
Genial Sergio muy util
Sos el mejor
Gran trabajo Sergio!
Genial. Gracias por el vídeo.
*_Bien explicado.....Gracias_*
Empieza en @6:20 para los que quieren ir al grano
No seas tan malo Hugo, tanto que me cuesta introducir los temas!
Excelente. Puedes dar una idea de como crear un convertidor de unidades para ingeniería. Gracias.
Excelente Sergio, muy bien explicado. Solo que me quede con una duda, ya que estamos haciendo una función personalizada, no me gusto que siguiera saliendo el error al no encontrar un espacio en la celda e hice esta modificación:
Function PrimeraPalabra(Celda As Range, Optional Convertir As Integer)
'Declarar variables
Dim intEspacio As Integer
Dim strPalabra As String
'Le decimos a Excel que la función se calcule automáticamente
Application.Volatile
For intEspacio = 1 To Len(Celda)
If Mid(Celda, intEspacio, 1) = " " Then
Exit For
End If
Next
strPalabra = Left(Celda, intEspacio - 1)
'1 = MAYÚSCULAS
'2 = minúsculas
'Omitir = la primera palabra sin cambios
Select Case Convertir
Case Is = 1
PrimeraPalabra = UCase(strPalabra)
Case Is = 2
PrimeraPalabra = LCase(strPalabra)
Case Is = Empty
PrimeraPalabra = strPalabra
End Select
End Function
Con esto ya no te da Error.
Una pequeña contribución!!!
Amigo sergio muy bueno tu video, sugiero para evitar la columna de errores =ENCONTRAR(" ";A6&" ")-1
waoooooooooooooooo excelente SERGIO y dime y demas UDF'S ?, seria genial que hagas mas tutos o pongas a la venta para bajarlos,,,explicas muy bien amiguito,,,de antemano te agradezco , eres un cielo....
Gracias por tus comentarios. Dime, te intesarían más cursos de UDFs?
siiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii plis yo estudio sistemas y estamos en POO...
Wow! Te queda perfecto el tema de macros. Tomaré tu sugerencia de las UDFs.
TE AGRADECERIA CORAZON , DIME QUE DIFERENCIA HAT ENTRE RANGE.SELECT Y RANGE.ACTIVATE , GRXS
Cuando no se tiene un rango de celdas elegido funcionan de la misma manera, eligen un rango. Pero hay una diferencia cuando se tiene un rango seleccionado. Prueba la siguiente macro y comentas si encuentras la diferencia:
Sub test()
Sheets(1).Activate
Range("A4:D10").Select
Range("C5").Activate
End Sub
Excelente video, pregunto ¿Cómo puedo hacer para que mi función esté disponible en cualquier libro de excel que yo abra y no solamente en el libro en el que la cree?
Gracias. Aquí ua-cam.com/video/sSqTj9HHqy8/v-deo.html
@@SergioAlejandroCampos muchisimas gracias ya quedó.
Uaoo!
Hola Buen tuto, pero tengio una duda, hay forma de crear una UDF con "Application.WorksheetFunction.RoundUp(V1,V2)"
donde:
V1 = Celda a Redondear
V2 = valor a redondear en este caso seria -2
y que a su vez me transforme a texto dando como resultado "$ #,#.00"
habra algo asi? bueno es que yo aqui en administracion empleo anidar funciones pero seria mas practico en una sola hacer eso..
mi proceso es:
=texto(redondear.mas(celda,-2),"$ #,#.00")
gracias por tu apoyo!
quedo pendiente.
Porque el IFERRROR no lo estableciste de una ves en la macro?
Hola. Con eso demuestro que podemos trabajar con funciones de Excel y UDF. Al final tenemos la decisión de hacerlo así o meter el IFERROR dentro de la UDF.
Sergio Alejandro Campos - EXCELeINFO Muchas gracias por tu respuesta.
🦾🦾👌👌✔✔👍👍🤗🤗👀👀😎😎🍺🍺🍺🍺🍺🍺🍺🍺🍺🍺🍺🍺