Las Macros del Ing. Miranda

Para subir hojas de calculo de Ingenieria civil
Reglas del Foro
Favor de usar el boton de Dar Gracias
En el mensaje del usuario al que deseas agradecer
En vez de escribir gracias repetidamente
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

Hola colegas, decidí crear este tema con mis aportes, espero que sean de su agrado, si desean aprender más sobre macros sepan que estoy a sus órdenes, actualmente doy clases en la carrera de Arquitectura del ITSF, pero soy ingeniero civil. Reportenme si hay un error en mis cálculos pero según yo están todos bien. Saludos y aunque es bueno agradecer no olviden escribir sus comentarios ya que así nos retroalimentamos.
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
Haroldsf
Usuario Master Superior
Usuario Master Superior
Mensajes: 606
Registrado: Sab Jul 05, 2008 1:21 pm
Ubicación: Constanza

ivan5114 escribió:Hola colegas, decidí crear este tema con mis aportes, espero que sean de su agrado, si desean aprender más sobre macros sepan que estoy a sus órdenes, actualmente doy clases en la carrera de Arquitectura del ITSF, pero soy ingeniero civil. Reportenme si hay un error en mis cálculos pero según yo están todos bien. Saludos y aunque es bueno agradecer no olviden escribir sus comentarios ya que así nos retroalimentamos.

Ing. ivan5114, descargue el pdf, me parece muy buen material, sobre el analisis matricial de estructuras, lo que no he podido abrir es la hoja de excel que tiene integrada, podria usted orientarme al respecto, hice lo que recomienda pero no la he podido abrir.
Avatar de Usuario
icsimavi
Usuario Master 1
Usuario Master 1
Mensajes: 278
Registrado: Sab Ago 25, 2007 7:42 pm
Ubicación: Manta

ING AGRADECIENDOLE EN TODOS SUS APORTES MI PEDIDO ES SI TENDRIA ALGO DE MANUALES PARA PODER APRENDER A REALIZAR MIS PROPIAS RUTINAS
GRCIAS
Avatar de Usuario
ajmojicar2002
Usuario Master Superior
Usuario Master Superior
Mensajes: 446
Registrado: Mié Sep 22, 2004 8:44 pm
Ubicación: SANTA MARTA

Hola. doy las gracias al Ing. Miranda por sus aportes.

Me gustaría saber como hacer un programa de presupuestos similar al que colocó en los aportes, la idea es poder hacer mi propia hoja de cálculo de presupuestos, programacion y demas.

Gracias nuevamente por su gentil colaboración.

Atte

Aldo Mojica R.
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

Para ver la hoja de cálculo adjunta en el pdf deben usar el Adobe Reader, si usan el Foxit Reader u otro prorgama, no los va a dejar. Una vez abierto el documento según la versión del Adobe que tengas prueba primero ir al capítulo 4 en la página 56 del documento, verás El subtítulo "4.1 Marcos Plano Con Miembros De Sección Constante" y junto un clip, haz doble clic sobre el clip, si no funciona busca alguna opción (barra a la izquierda) que diga archivos adjuntos o Attachments o busca un ícono en forma de clip.

Si se fijan bien en el archivo pdf sobre análisis estructural en el capítulo 2 hablo de forma muy general sobre las funciones en excel y la forma de crear macros y pongo unos ejemplos sencillos, pueden empezar por alli. Para los que busquen otro manual aquí les 2 manuales.
VBAExcel-MNumericos.pdf
Manual 2 http://foros.construaprende.com/manual- ... tml#p34737

Y no se olviden de la web:

http://www.ayudaexcel.com/
http://www.excelworker.virtuabyte.cl/in ... &Itemid=27
http://hojas-de-calculo-en-excel.blogspot.com/

Suerte!
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
criverao
Usuario Intermedio
Usuario Intermedio
Mensajes: 61
Registrado: Lun Nov 27, 2006 7:14 pm
Ubicación: Tegucigalpa, M.D.C.

Ingeniero Miranda muy interesante su aporte, pero en la hoja 5 Losas NTC en datos el lado corto y lado largo tienen que multiplicarse por el factor 0.3048 para convertirlo a m?, por que no lo introduce directamente?. Yo he preparado unos trabajos similares, tambien soy ingeniero civil e imparto clases en la Universidad Catolica de Honduras. :?:
criverao@yahoo.es

criverao
ROVILLJ
Usuario Principiante
Usuario Principiante
Mensajes: 4
Registrado: Lun Jul 14, 2008 2:39 pm
Ubicación: TACNA

ing miranda interesanre trabajar con macros no se si es posible ud tendra la lisTa de comandOs que se uSaN en las macros con su respectiva descripciOn y ejemplos respectivos, si no es mucha molestia le agradeceria bastante además no se si ud cuenta con una macro para trabajar lineas de influencia, podria por favor enviar esta informacion a mi correo rovillj@hotmail.com. QUE AHORA LA NECESITA YA QUE ESTOY HACIENDO MI TESIS SOBRE PUENTES CONTINUOS

,MUCHOS SALUDOS Y AGRADEZCO ANTISIPADAMENTE SU INFORMACIÓN
criverao
Usuario Intermedio
Usuario Intermedio
Mensajes: 61
Registrado: Lun Nov 27, 2006 7:14 pm
Ubicación: Tegucigalpa, M.D.C.

Ing. Miranda realmente lo felicito por esos grandes aportes que usted hace. Muy pronto le enviare algo para que me ayude. He estudiado mucho lo que respecta a macros pero me cuesta hacer una aplicacion para ingenieria civil por ejemplo el dibujar en 2D usando visual basic. Nuevamente lo felicito!!! :SM010:

criverao
Avatar de Usuario
JOVIMECARCH
Usuario Master 2
Usuario Master 2
Mensajes: 319
Registrado: Mar Nov 28, 2006 3:28 pm
Ubicación: Puebla

saludos

yo tengo unas tablas excel similares
tambien soy docente en la licenciatura de arquitectura

aqui hay un ejemplo didactico de la aplicacion de las tablas que he construido
excepto las de las zapatas de concreto armado, que por falta de tiempo no las
pude preparar y tuve que usar un software comercial

aqui el link para ver las aplicaciones

http://www.scribd.com/doc/9379330/Memoria-de-Calculo
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

criverao escribió:Ingeniero Miranda muy interesante su aporte, pero en la hoja 5 Losas NTC en datos el lado corto y lado largo tienen que multiplicarse por el factor 0.3048 para convertirlo a m?, por que no lo introduce directamente?.
criverao
[EDITO]Gracias por tus comentarios y obsevaciones, en la hoja de cálculo de losas NTC hay que poner las longitudes de los lados de la losa en metros, lo que pasa es que en la hoja que subí estaba revisando un problema donde las longitudes estaban en pies e hice las conversión dentro de la misma celda...
JOVIMECARCH escribió: yo tengo unas tablas excel similares
tambien soy docente en la licenciatura de arquitectura
http://www.scribd.com/doc/9379330/Memoria-de-Calculo
Gracias por compartir los documentos.... bajando :)

Sobre lo de las lineas de influencia, no tengo por el momento ninguna hoja de cálculo sobre eso, pero podríamos trabajar juntos en ello. Y sobe lo de dibujar en 2D, también es un reto para mi :)

Es laborioso hacer una lista sobre las fuciones y su descripción, me gustaría saber que es lo que quieres hacer y sobre eso recomendarte algunas fuciones, un tip que les puede ayudar es usar la ayuda de excel allí esta todo, pero no la ayuda común y corriente sino la ayuda vba, en excel presionen ALT+F11 para entrar al editor de visual basic, unavez allí presionen F1.
criverao
Usuario Intermedio
Usuario Intermedio
Mensajes: 61
Registrado: Lun Nov 27, 2006 7:14 pm
Ubicación: Tegucigalpa, M.D.C.

Good morning!!. I've written a structural program and also I've drawn the loads for a concrete beam. The loads for the beam is compound of concentrated vectors and distributed uniform loads on different spans (3 spans). The point is I got 6 cells from A12 named P1, through B12=P2 for the first span, C12=P3 and D12=P4 for the 2nd span, and so on up to the 3rd span, all P1:P6 are concentrated loads, respectively. The same situation occurs with the cells H12 named D1, through I12=D2, for the first span J12=P3 and K12=P4 for the 2nd span, and so on up to the 3rd span, all D1:D6 are distributed uniform loads, respectively. All these are combined loads, say, P1 and D1 for the first span, and so on. What I want is to write down a visual basic application module to do the following: every time I click any cell for example the cell A13 (first span), or the cell C13 (2nd span) (at random) to input data then the expected change or product be a drawn vector at any indicated location through the spans. I want the same thing at the same time with the distributed uniform loads, in this case I do not wish to draw a vector but a rectangular box alongside of 2 cells indicating span 1 or span 2 or span 3, each one with 2 cells. Here is where I need your help!! What I wrote I think works but I do not know how to link it with my problem. It just works for distributed uniform loads, because I do not know how to do it for a concentrated load, mainly with combined load. Finally the program!!

Sub NewDiagram ()
Dim wksActiveSheet As WorkSheet
Dim shDiagram As Shape
Set wksActiveSheet=ActiveSheet
Set shDiagram=wksActiveSheet.Shapes.AddDiagram (Type:=msodiagramRadial, Left:=60,_ Top:=40,Width:=120, Height:=12.75 'Height of a normal file)
'Fill the diagram to make it visible to the user with vertical strips meaning distributed uniform loads with a RGB color and borders if possible
shDiagram.Fill.Visible=msoTrue
' but I just see a white box without strip color and border

Would you mine help me to prepare a better way to reach my purpose in this project? I will be forever thankfull to you!!

sincerely,

criverao
criverao
Usuario Intermedio
Usuario Intermedio
Mensajes: 61
Registrado: Lun Nov 27, 2006 7:14 pm
Ubicación: Tegucigalpa, M.D.C.

Disculpe ingeniero hace unos minutos le envie un mensaje en ingles preguntando como se dibuja con vba cargas concentradas y uniformemente distribuidas en celdas, ya que he hecho un programa con hardy cross pero necesito saber como hace usted para dibujar. Gracias por su respuesta ingeniero. Y nuevamente mis disculpas. :altav:

sinceramente,

criverao
criverao
Usuario Intermedio
Usuario Intermedio
Mensajes: 61
Registrado: Lun Nov 27, 2006 7:14 pm
Ubicación: Tegucigalpa, M.D.C.

Ing. Miranda hace mucho tiempo bajé este archivo de lineas de influencia en excel para vigas continuas. Espero le sirva de mucho.
criverao
InfluenceLines.xls
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

Se ve interesante su código, le adjunto un archivo de excel donde grafico los diagramas de momento y cortante de una viga con carga uniforme, pongo aquí el código de todas maneras

Código: Seleccionar todo

Sub Cortante_Momento()
Dim L, incremento As Double
Dim renglon As Integer
L = Worksheets("CARGA UNIFORME").Cells(21, 2).Value
incremento = 0.3
renglon = 0
Worksheets("CARGA UNIFORME").Range("B26:D150").ClearContents

For i = 0 To L Step incremento
    Worksheets("CARGA UNIFORME").Cells(25 + renglon, 2).Value = i
    Worksheets("CARGA UNIFORME").Cells(25 + renglon, 3).FormulaLocal = "=w * x - Rj"
    Worksheets("CARGA UNIFORME").Cells(25 + renglon, 4).FormulaLocal = "=-w * x ^ 2 / 2 + Rj * x - Mj"
    renglon = renglon + 1
Next i
    Sheets("CARGA UNIFORME").ListBox1.ListFillRange = "b25:d" & 25 + renglon
    Sheets("CARGA UNIFORME").ListBox1.ColumnWidths = "45;45;45"
    Sheets("CARGA UNIFORME").ListBox1.Width = 150
    Sheets("CARGA UNIFORME").ListBox1.Height = 150
    'Application.DisplayAlerts = False
    'Charts("DIAGRAMA CARGA UNIFORME").Delete
    'Application.DisplayAlerts = True
    'Charts.Add
    Charts("DIAGRAMA CARGA UNIFORME").Activate
    'ActiveChart.Name = "DIAGRAMA CARGA UNIFORME"
    ActiveChart.ChartType = xlLine
    ActiveChart.SeriesCollection(1).Delete
    ActiveChart.SeriesCollection(1).Delete
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(1).XValues = "='CARGA UNIFORME'!R25C2:R2" & renglon + 25 & "C2"
    ActiveChart.SeriesCollection(1).Values = "='CARGA UNIFORME'!R25C3:R" & renglon + 25 & "C3"
    ActiveChart.SeriesCollection(1).Name = "=""CORTANTE"""
    ActiveChart.SeriesCollection(2).Values = "='CARGA UNIFORME'!R25C4:R" & renglon + 25 & "C4"
    ActiveChart.SeriesCollection(2).Name = "=""MOMENTO"""
    ActiveChart.Location Where:=xlLocationAsNewSheet
    ActiveChart.HasDataTable = False
End Sub
El archivo corre bien en office 2003, no lo he probado en office 2007, si tienen dudas aquí las aclaramos
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
criverao
Usuario Intermedio
Usuario Intermedio
Mensajes: 61
Registrado: Lun Nov 27, 2006 7:14 pm
Ubicación: Tegucigalpa, M.D.C.

Ingeniero muchas gracias por esa ayuda lo analizaré, en caso de hacer algo con mi proyecto se lo haré llegar. Gracias soy hondureño.

criverao
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

criverao escribió:Ingeniero muchas gracias por esa ayuda lo analizaré, en caso de hacer algo con mi proyecto se lo haré llegar. Gracias soy hondureño.

criverao
Me parece muy bien, suerte en tu proyecto!.
JOVIMECARCH escribió:saludos

yo tengo unas tablas excel similares
tambien soy docente en la licenciatura de arquitectura
Sería mucha molestia si pudieras publicar los archivos de excel?

Por cierto, encontré un manual muy bueno sobre macros en excel (básico) para todos aquellos que se deseen iniciar en esta utilidad, el manual parte desde cero y tiene una descripción de las funciones y con ejemplos prácticos.
macros-excel.PDF
También les adjunto un archivo de ejemplo de formularios
Formularios.xls
.

Provecho!. Pronto más macros...
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
ijflores
Usuario Principiante
Usuario Principiante
Mensajes: 3
Registrado: Jue Sep 04, 2008 10:52 am

Hace muchisimo tiempo que no me pasaba por aqui.

Estoy bajando tus macros, agradecido desde ya por el trabajo.
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

ijflores escribió: Estoy bajando tus macros, agradecido desde ya por el trabajo.
De nada, compartir es bueno!.

Por cierto, les paso una versión mejorada del cálculo de losas por el método NTC 2004 Df, incluye el cálculo del peralte mínimo para no calcular deflexiones y también calcula automáticamente la interpolación de m cuando no esta en los valores tabulados. PROVECHO!
LOSAS LIMM 2009.xls
Estoy preparando un ejemplo para que vean lo fácil que es calcular una losa con esta hoja de cálculo :SM010:
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

Esta no es en sí una macro pero es una hoja de excel para integrar el costo horaria de maquinaria y equipo de construcción general, está de acuerdo al reglamento de la ley de obras públicas y servicios relacionados con las mismas del distrito federal.
Costo horario máquina.xls
:SM005:
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
MAURICIO SILVA
Usuario Principiante
Usuario Principiante
Mensajes: 5
Registrado: Jue May 21, 2009 3:17 pm

icsimavi escribió:ING AGRADECIENDOLE EN TODOS SUS APORTES MI PEDIDO ES SI TENDRIA ALGO DE MANUALES PARA PODER APRENDER A REALIZAR MIS PROPIAS RUTINAS
GRCIAS
Ing. Le agradezco mucho su aporte que Dios lo bendiga y le de mas sabiduria
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

MAURICIO SILVA escribió:Ing. Le agradezco mucho su aporte que Dios lo bendiga y le de mas sabiduria
De nada, se trata de devolver el favor, y aunque no soy creyente, se agradece el comentario
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

En algunas ocasiones, como constructores no tenemos un contador de base que nos ayude debido a que tenemos obras muy pequeñas y sólo utilizamos los servicios de éste en ocasiones especiales, por lo que tenemos que saber algo de recursos humanos.

Pongo a su disposición una hoja de cálculo de Excel para realizar finiquitos (obviamente bajo las leyes mexicanas), actualmente estoy actualizando una hoja de excel para elaborar nóminas que más tarde subiré al foro. Les comento que esta macro hace uso del componente mscal.ocx, éste se instala comúnmente junto el MS Access, si no lo tienen instalado entonces les paso el ocx para que lo instalen, saludos!
FINIQUITO.xls
mscal.rar
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
JISANTOS
Usuario Principiante
Usuario Principiante
Mensajes: 30
Registrado: Vie Jul 25, 2008 10:15 am

NO QUEDA MAS QUE AGRADECER ING. MIRANDA, ESTE APORTE PREVIENE A LOS MAS NOVATOS PARA ENRIQUECER ESTA MACRO,GRACIAS.
ing.carlosalfredo
Usuario Principiante
Usuario Principiante
Mensajes: 8
Registrado: Lun Sep 29, 2008 11:31 pm

estimado amigo ,,una duda con tu tabla de morteros ,,cuando pornes cero en la celda de cal ,,aumenta la resistencia del mortero ,,ejemplo cuando pones 1,1,3, la resistencia es menor que cuando pones 1,0,3,,espero me aclares essta duda (cemneto,cal,arena)
Avatar de Usuario
davidarellano
Usuario Frecuente
Usuario Frecuente
Mensajes: 198
Registrado: Dom Oct 14, 2007 2:31 pm
Ubicación: celaya

criverao escribió:Ing. Miranda hace mucho tiempo bajé este archivo de lineas de influencia en excel para vigas continuas. Espero le sirva de mucho.
criverao
InfluenceLines.xls
GRACIAS ING MIRANDA. COMO SE EJECUTAN LAS MACROS?
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

ing.carlosalfredo escribió:ejemplo cuando pones 1,1,3, la resistencia es menor que cuando pones 1,0,3,,espero me aclares essta duda (cemneto,cal,arena)
Se reduce la resistencia por que la cal se supone que no aporta casi nada en la resistencia, sólo ayuda para tener mejor menejabilidad, si checas las NTC de mampostería la tabla 2.2 da los proporcionamientos recomendados para elementos estructurales y verás que los que tienen menos cal con relacion al cemento son más resistentes

con respecto a lo de las macros todo depende de que version de office tengas
Avatar de Usuario
davidarellano
Usuario Frecuente
Usuario Frecuente
Mensajes: 198
Registrado: Dom Oct 14, 2007 2:31 pm
Ubicación: celaya

ivan5114 escribió:
ing.carlosalfredo escribió:ejemplo cuando pones 1,1,3, la resistencia es menor que cuando pones 1,0,3,,espero me aclares essta duda (cemneto,cal,arena)
Se reduce la resistencia por que la cal se supone que no aporta casi nada en la resistencia, sólo ayuda para tener mejor menejabilidad, si checas las NTC de mampostería la tabla 2.2 da los proporcionamientos recomendados para elementos estructurales y verás que los que tienen menos cal con relacion al cemento son más resistentes

con respecto a lo de las macros todo depende de que version de office tengas
Gracias pòr tu respuesta pronta, tengo 2003 y 2007 en diferentes PCs uno de los archivos que enviaste dice que no se ejecuta el macro Atte Ing Arellano carioca502000@yahoo.com.mx
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

En office 2003.

Necesitas bajar la seguridad de las macros a Medio, en el menù de Herramientas - Macros - Seguridad - Medio.

En office 2007

En el menu de office - opciones de Excel - Centro de Confianza - Configuración del Centro de Confianza - Configuración de Macros - Habilitar todas las macros

Después de usar mi archivo te recomiendo volver a poner la configuración anterior.

En caso de que estés hablando del archivo de finiquito, primero debes registrar el ocx que allí mismo publiqué
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

Hola que tal amigos de construaprende, les dejo una hoja de cálculo para los docentes, obviamente esta adaptada a mis necesidades y preferencias pero no olviden que esto es sólo para que ilustrar el uso de las macros (OJO, DEBEN TENER INSTALADO EL COMPONENTE MSCAL.OCX, BUSQUEN EN GOOGLE HAY MUCHA INFORMACIÓN).
CONTROL ESCOLAR 2009 YO.xls
Además les propongo un reto, que les parece si organizamos un concurso para ver quien encuentra la mejor solución a un problema determinado, aquí va el primero:

Necesito que en una hoja de excel se generen en cuatro celdas diferentes los números 1,2,3 y 4 aleatoriamente sin repetirse (osea que en cada celda salga un número diferente por ejmplo 2-3-4-1), utilizando únicamente fórmulas SIN MACROS.
RETO1.xls
VAMOS! HAGAN SUS APUESTAS :lol:
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

En vista de los resultados obtenidos (nadie le entró al acertijo) aquí va la respuesta de como lo hice. Y basta de acertijos:

celda 1: =ALEATORIO.ENTRE(1;4)
celda 2: =SI(B2=1;ALEATORIO.ENTRE(2;4);SI(B2=4;ALEATORIO.ENTRE(1;3);SI(B2=2;ALEATORIO.ENTRE(3;4);4)))
celda 3: =VALOR(EXTRAE(BUSCAR(PRODUCTO(B2:B3);{2;3;4;6;8;12};{34;24;23;14;13;12});ALEATORIO.ENTRE(1;2);1))
celda 4: =VALOR(SI(ENCONTRAR(B4;BUSCAR(PRODUCTO(B2:B3);{2;3;4;6;8;12};{34;24;23;14;13;12}))=1;
EXTRAE(BUSCAR(PRODUCTO(B2:B3);{2;3;4;6;8;12};{34;24;23;14;13;12});2;1);EXTRAE(BUSCAR(PRODUCTO(B2:B3);
{2;3;4;6;8;12};{34;24;23;14;13;12});1;1)))

La función ALEATORIO.ENTRE devuelve un número aleatorio entre los valores especificados
La función VALOR convierte caracteres numericos a números
La función EXTRAE devuelve una cadena de caracteres de un texto
La función PRODUCTO realiza la multiplicación de dos o más valores
La función BUSCAR encuentra un valor dentro de una lista o matriz

Todas estas funciones son MUY útiles, sólo usen su imaginación.

Saludos y por favor APORTEEEEEN! :SM010:
Saul Caracas
Usuario Principiante
Usuario Principiante
Mensajes: 1
Registrado: Jue Sep 17, 2009 3:16 pm

Buenas Ing. Gracias por publicar sus trabajos. Sabe que estoy interesado en aprender a usar las herramienras de excel avanzado para mejorar mis hojas de cálculo. Quisiera saber si usted me puede ayudar con un curso en línea. Gracias
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

Saul Caracas escribió:Buenas Ing. Gracias por publicar sus trabajos. Sabe que estoy interesado en aprender a usar las herramienras de excel avanzado para mejorar mis hojas de cálculo. Quisiera saber si usted me puede ayudar con un curso en línea. Gracias
Claro sólo sube tus hojas a este foro y dinos que deseas hacer, estoy seguro que aquí hay mucha gente dispuesta a ayudarte, incluido yo por supuesto :SM010:
JeffreyQA7
Usuario Principiante
Usuario Principiante
Mensajes: 1
Registrado: Mié Sep 30, 2009 1:56 pm

JOVIMECARCH escribió:saludos

yo tengo unas tablas excel similares
tambien soy docente en la licenciatura de arquitectura

aqui hay un ejemplo didactico de la aplicacion de las tablas que he construido
excepto las de las zapatas de concreto armado, que por falta de tiempo no las
pude preparar y tuve que usar un software comercial

aqui el link para ver las aplicaciones

http://www.scribd.com/doc/9379330/Memoria-de-Calculo
agradecerte compartir tus trabajos...me parece excelente tu aporte pero me gustaria descargarlo, podrias por favor enviar el URL para descargarlo t lo agradesco de antemano. Saluodos desde Cusco- Peru
pepermel1
Usuario Principiante
Usuario Principiante
Mensajes: 4
Registrado: Vie Oct 10, 2008 8:20 pm

Ante todo gracias Ing. Miranda, Ud que domina macros, por favor quisiera que me ayude a realizar un macro de excel, resulta que tengo unos datos de secciones transversales de una carretera los cuales vienen ordenados de cierta forma (provienen de un programa de diseño de vias) , estos mismos datos deseo ordenarlos de otra forma en la misma hoja de excel para de ahi importarlos al programa (otro programa que diseña vias) que va a procesar esos datos en una hoja de excel. Aqui le envio una imagen de muestra.Yo hice la macro pero solo para la primera estacion, progresiva o estaca (se conoce asi a las estaciones de un eje de carretera en latinoamerica), tambien le envio la hoja de calculo con las formulas para la primera estaca, el problema es como hacerlo para que me ordene toda la hoja ps en las diferentes estaciones tienen diferentes medidas y cotas a cada lado del eje de carretera.
Muchas gracias.
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

hoLA pepermel1, Se ve interesante tu aplicación, aquí te pongo el código que se me ocurre, desde luego deben existir formas más elegantes pero aquí va esta:

Las condiciones son las siguientes:
1.-En las columnas A,B y C deben estar de forma ininterrumpida todos los datos, es decir, no debe haber celdas en blanco intermedias.
2.-En la hoja que publicaste cuando pasas los datos de la izquierda pones una celda con: "I: " y luego continuas, esto no lo hice sino que dentro de la misma celda se escribe la "I:" seguido de los datos, eso te lo dejo de tarea :) .
3.-Dado que son muchos datos tal vez se tarde un poco la ejecución, es normal, si en algún momento quieres detener la ejecución en curso presiona ESC.

A continuación el código:

Código: Seleccionar todo

Sub estacas()
Dim total, contador1, contador2 As Integer 'SE DECLARAN VARIABLES
ActiveWorkbook.Worksheets(1).Select 'SE SELECIONA LA HOJA 1
Range("F:F").ClearContents 'SE LIMPIAN DATOS
total = Application.WorksheetFunction.Count(Range("A:A")) 'SE OBTIENE EL NÚMERO DE DATOS
contador1 = 1 'SE INICIALIZAN LOS CONTADORES
contador2 = 0
For i = 1 To total 'BUCLE QUE RECORRE TODAS LAS FILAS
    If Cells(i, 1) = Cells(i + 1, 1) Then 'SE EVALÚA SI SE ENCUENTRA EN EL MISMO KILÓMETRO
        If Cells(i, 3) >= 0 Then 'SE EVALÚA SI ES A LA DERECHA O CERO
            If Cells(i, 3) = 0 Then 'SE EVALÚA SI ES CERO
                Cells(contador1, 6) = "E: " & Cells(i, 1) & " " & Cells(i, 2)
            Else 'SI NO ES CERO ES POSITIVO
                Cells(contador1, 6) = Cells(i, 2) & " " & Cells(i, 3)
            End If
            contador1 = contador1 + 1
        Else 'SI NO ES >= 0 ENTONCES ES NEGATIVO
            contador2 = contador2 + 1
        End If
    Else 'SI NO ESTÁ EN EL MISMO KILOMETRAJE
        Cells(contador1 + 1, 6) = "I: " & Cells(contador1 - contador2, 2) & " " & -Cells(contador1 - contador2, 3)
        For j = 2 To contador2 'BUCLE PARA ESCRIBIR LOS NUMEROS NEGATIVOS
            Cells(contador1 + j, 6) = Cells(contador1 - contador2 + 1 - j, 2) & " " & -Cells(contador1 - contador2 + 1 - j, 3)
        Next j
        Cells(contador1, 6) = Cells(i, 2) & " " & Cells(i, 3)
        contador1 = i
        contador1 = contador1 + 1
        contador2 = 0
    End If
Next i
End Sub


Y la hoja
TR. NATURAL KM. 60-70.xls
Saludos! Espero haya sido de ayuda :SM010:
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
batman
Usuario Principiante
Usuario Principiante
Mensajes: 23
Registrado: Mié Ago 19, 2009 9:31 pm

ivan5114 escribió:Hola colegas, decidí crear este tema con mis aportes, espero que sean de su agrado, si desean aprender más sobre macros sepan que estoy a sus órdenes, actualmente doy clases en la carrera de Arquitectura del ITSF, pero soy ingeniero civil. Reportenme si hay un error en mis cálculos pero según yo están todos bien. Saludos y aunque es bueno agradecer no olviden escribir sus comentarios ya que así nos retroalimentamos.
Muy interesante todas sus hojas y aplicaciones. Me motiva escribirle por que tengo una incertidumbre y confusión para solicitar su ayuda; realizo cálculos en libros de excel, o sea, utilizo muchas hojas debido a que amerito tener toda la información en pantalla para ver los resultados, esto ocasiona una rutina de trabajo y me obliga a relacionar o hacer muchos " links" entre hojas que en ocasiones son datos historicos que me hacen falta para cálculos pero que me vincula con otros archivos y eso me obliga a crear libros con muchas hojas.
Tengo días tratando de ver como le facilito mi solicitud de ayuda para ver como me orienta a mejorar mis cálculos, se me ocurre que si le paso en forma progresiva cada hoja del libro de un archivo ya creado, se le facilitará a usted poderme ayudar.
No se si me hice entender en lo que escribí pero igual espero su interpretación y posterior ayuda.
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

batman escribió:
ivan5114 escribió: Tengo días tratando de ver como le facilito mi solicitud de ayuda para ver como me orienta a mejorar mis cálculos, se me ocurre que si le paso en forma progresiva cada hoja del libro de un archivo ya creado, se le facilitará a usted poderme ayudar.
No se si me hice entender en lo que escribí pero igual espero su interpretación y posterior ayuda.
Sí te entiendo, pero para poderte ayudar necesito me mandes la hoja de cálculo.

Saludos!
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

pepermel1 escribió:Ante todo gracias Ing. Miranda, Ud que domina macros, por favor quisiera que me ayude a realizar un macro de excel, resulta que tengo unos datos de secciones transversales de una carretera los cuales vienen ordenados de cierta forma (provienen de un programa de diseño de vias) , estos mismos datos deseo ordenarlos de otra forma en la misma hoja de excel para de ahi importarlos al programa (otro programa que diseña vias) que va a procesar esos datos en una hoja de excel. Aqui le envio una imagen de muestra.Yo hice la macro pero solo para la primera estacion, progresiva o estaca (se conoce asi a las estaciones de un eje de carretera en latinoamerica), tambien le envio la hoja de calculo con las formulas para la primera estaca, el problema es como hacerlo para que me ordene toda la hoja ps en las diferentes estaciones tienen diferentes medidas y cotas a cada lado del eje de carretera.
Muchas gracias.
Este camarada ni por el cambio volvió :lol:
HERDEL
Usuario Principiante
Usuario Principiante
Mensajes: 2
Registrado: Dom Oct 11, 2009 9:00 am

Hola ingeniero, me parece interesante los macros que usted ha creado y estoy interesado en aprender ha realizarlos empezando con macros pequeños ya que me quede utilizando el Visualbasic de antaño para la creacion de programas. Agradeceria si tienes una forma facil de ayudarme a entrar en este estilo de programaciom. Mi correo es ingecadher@gmail.com
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

HERDEL escribió:Hola ingeniero, me parece interesante los macros que usted ha creado y estoy interesado en aprender ha realizarlos empezando con macros pequeños ya que me quede utilizando el Visualbasic de antaño para la creacion de programas. Agradeceria si tienes una forma facil de ayudarme a entrar en este estilo de programaciom. Mi correo es ingecadher@gmail.com
Para todos aquellos que busquen ayuda para empezar en esto de las macros, les aconsejo que lean todo este tema, ya que se publicaron manuales muy buenos y fáciles de entender. Es cuestión que lean bien post anteriores. Saludos. Y si tienen una duda específica suban su hoja de excel con gusto le hacemos la lucha.

Nada más regresen y digan si funcionó o no ya que es molesto leer peticiones y ponerse a trabajar en vano y no recibir respuestas al menos por cortesía.

SALUDOS
bico1976
Usuario Principiante
Usuario Principiante
Mensajes: 1
Registrado: Lun Oct 26, 2009 8:39 pm
Ubicación: LOS MOCHIS

hola! como le hago para ver sus archivos adjuntos y descargarlos.


saludos!!!
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

Hola, para ver los archivos adjuntos debes iniciar sesión con tu nombre y contraseña al foro y actualizar la página de ser necesario luego ya podrás verlos.
HermamP
Usuario Principiante
Usuario Principiante
Mensajes: 10
Registrado: Dom Oct 04, 2009 2:14 pm

MUCHOS SALUDO INGENIERO MIRANDA:

LE FELICITO POR SUS APORTES A LA INGENIERIA.

LE SOLICITO SI ME PUEDIERA ORIENTAR, SOBRE EL CALCULO DE LOS BTU/H. EN ALGUN PROCEDIMIENTO QUE TENGA PARA EXECEL.

AFIN DE QUE INGRESANDO LOS TATOS.

TENGA LA CAPICIDAD DE ELEGIR EL ARTEFACTO. ADEACUADO.

MUCHAS GRACIAS DE ANTEMANO.

Y FELICIDADES.
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

HermamP escribió:MUCHOS SALUDO INGENIERO MIRANDA:
LE SOLICITO SI ME PUEDIERA ORIENTAR, SOBRE EL CALCULO DE LOS BTU/H. EN ALGUN PROCEDIMIENTO QUE TENGA PARA EXECEL.
Desafortunadamente no cuento con esa aplicación pero si me pasas la teoría o me explicas que quieres hacer tal vez podamos hacer un procedimiento
HermamP
Usuario Principiante
Usuario Principiante
Mensajes: 10
Registrado: Dom Oct 04, 2009 2:14 pm

INGENIERO MIRANDA.

UN CORDIAl SALUDO Y CONTINUANDO CON EL TEMA DEL CALCULO DE LOS BTH/H. EN MI INVESTIGACION HE ENCONTRADO UN PAGINA QUE NOS PUEDE SERVIVIR PARA DETERMINAR DICHO CALCULO.

http://www.carrier.es/carriershop/mycomfort2.htm.

OTRA MANERA IMPIRICA DE TERMINAR LOS BTU/H. ES

MULTIPLIACAR.

(L) = LARGO.
(A) = ANCHO.
(h) = ALTURA. x 200.

BTU/H = (L) * (A) * (h) * 200.

ADEMAS LES ENVIO UNA HOJA DE CALCULO QUE BAJE DE LA RED.
PARA CALCULAR LAS FRIGORIAS/HORAS. TAMBIEN NECESARIAS PARA ENCONTRAR EL TIPO DE AIR CONDITION

ATENTAMENTE SU AMIGO Y SERVIDOR.

ING° CIVIL.


HERNAN PEÑA.

MANCORA - PERU.
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

HermamP escribió:
ADEMAS LES ENVIO UNA HOJA DE CALCULO QUE BAJE DE LA RED.
PARA CALCULAR LAS FRIGORIAS/HORAS. TAMBIEN NECESARIAS PARA ENCONTRAR EL TIPO DE AIR CONDITION

ATENTAMENTE SU AMIGO Y SERVIDOR.

ING° CIVIL.


HERNAN PEÑA.

MANCORA - PERU.
Gracias por el aporte. Saludos :SM010:
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

EJEMPLO CÁLCULO LOSA.pdf
Después de un rato de inactividad, regreso y hago este aporte, saludos!
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.
thororion
Usuario Principiante
Usuario Principiante
Mensajes: 1
Registrado: Dom Jun 13, 2010 7:41 pm

SOLICITO EL ENVIO DE UNA TABLA EN EXCEL APLICANDO HARDY CROSS
Y OTRA SI LA TIENE EL CALULO Y DISEÑO DE SSISTEMA CONTRA INCENDIO EN ESPECIAL ROCIADORES
criverao escribió:Disculpe ingeniero hace unos minutos le envie un mensaje en ingles preguntando como se dibuja con vba cargas concentradas y uniformemente distribuidas en celdas, ya que he hecho un programa con hardy cross pero necesito saber como hace usted para dibujar. Gracias por su respuesta ingeniero. Y nuevamente mis disculpas. :altav:

sinceramente,

criverao
Avatar de Usuario
ivan5114
Usuario Intermedio
Usuario Intermedio
Mensajes: 63
Registrado: Sab Nov 10, 2007 1:54 pm
Ubicación: ZACATECAS
Contactar:

Alguna otra cosita que se le ofrezca?
thororion escribió:SOLICITO EL ENVIO DE UNA TABLA EN EXCEL APLICANDO HARDY CROSS
Y OTRA SI LA TIENE EL CALULO Y DISEÑO DE SSISTEMA CONTRA INCENDIO EN ESPECIAL ROCIADORES
pacheco
Usuario Intermedio
Usuario Intermedio
Mensajes: 79
Registrado: Vie Nov 28, 2008 12:44 pm

ing. mire quisiera que me ayudara con una formula para calcular las relaciones de gasto- velocidad de un sistema de alcantarillado esque pedi ayuda en este foro pero la verdad no tube una ayuda faborable y esque la verdad no tengo mucho conocimiento de excel solo se lo basico, pero tengo la idea de lo que necesito, eso me ahorraria mucho tiempo, mira se trata de lo siguiente tengo una tabla de relaciones y mi formula quiero que sea la siguiente.
al tener una valor, producto de la multiplicacion de a*b y si este valor le corresponde alguna relacion de la tabla:ponerlo y si no interpolar entre los valores mas cercanos a esa relacion.masomenos es lo sig-

dato dato a
del cal. obtener de la tabla tabla de relaciones
rq rv GASTO VELOCIDAD TIRANTE
.1 .2 0.1 0.2
.8 ---- 1 2

como podemos ver la relacion de gasto rq=.1 tiene una rv=0.2, pero para la relacion rq=0.8 no existe asi que se tiene que interpolar eaqui donde me tardo demaciado para sacar la relacion de velocidades que le corresponden a la relacion del gasto. ing. ojala me aya entendido pero si cree poder ayudarme mi correo es simongonzalez98@hotmail.com de veracruz mexico.
hasta pronto y estamos encontacto
Responder

Volver a “Hojas de Calculo Excel”

  • Información