antares18

Private Sub TextBox1_Change() Range("A" + TextBox1.Text + ":" + "B" + TextBox1.Text).Select End Sub

Aquí tienes la función Public Function unoguion(Dato_a_buscar As String, Columna_buscar_en As Range) As String Dim i As Double Dim trobat As Boolean i = 1 trobat = False For Each Item In Columna_buscar_en 'El item es cada celda de Columna_buscar_en,...

La variancia es (X-Media Aritmética)^2 El media de A es 35.6 El media de B es 34 El media de C es 32.6 Entonces haces (39-35.6)^2=11.56 (33-35.6)^2=6.76 ... (32-35.6)^2=12.96 Los sumas todos y los divides entre n-1, siendo n el número de elementos...

Lo que hicieron es (1-0.9935)*25.000=162.50$

Haces como si fuera una ecuación de 2o grado. Pones. S=n+(n*(n-1))/2 2(S-n)=n2-n 2S-2n=n2-n 2S=n2+n 2S=n(n+1) Aquí lo que te ha dado n2+n-2S [-1+-raiz(1-4*1*(-2S))]/2 [-1+-raiz(1+8S)]/2= [-1+raiz(8S+1)]/2 -> Solución 1 [-1-raiz(8S+1)]/2 ->Solución 2...

Pones una parte que ponga default: msgbox("El material no está disponible") Funciona como un else. Lo pones antes del end select

Yo normalmente uso esta http://msdn.microsoft.com/en-us/library/bb238869.aspx. Está en inglés, contiene ejemplos de los métodos y propiedades de los objetos

Las funciones que son del tipo 1/(algo) normalmente son ln de ese algo. En tu caso quedaría S(1/(e^x+1))=ln(e^x+1)/e^x (La integral de dentro quedaría e^x, igual)

No se si lo he entendido bien, quieres usar lo que hace la función contara pero no en la barra, lo quieres en un módulo para saber el numero exacto que cumplen la función. Si es así la fórmula es esta. Public Function contar_celda(Celdas As Range) As...

Pon =si(eserror(Celda donde está el #!VALOR¡);0;"") Con esto haces que si te da error la celda sale un 0 y el resultado no te cambia y si no hay error te pone la celda a vacío, sin nada dentro de la celda.