antares18

Sub Combobox21_change() dim i as integer dim columna_de_productos as string 'Supongo que esta en la columna B columna_de_productos="B" 'Si la 1a fila tiene encabezado i=2, si no i=1 'Supongo que los tiene i=2 While(Range("A"+cstr(i))<>"") 'En la...

El procedimiento es igual para el textbox que para el label. Lo que tu estás pidiendo técnicamente es esto. Hoja1 es la hoja donde tienes el formulario. TextBox21 y Label21 el textbox y el label Hoja1. TextBox21.Text = CStr(Hoja1. Range("A1"). Value)...

Se puede solucionar como un problema de sustitución. 5^a=2005 2005^b=3125 Sustituyo el 2005 de la 1a ecuación en la 2a (5^a)^b=3125 Al haber dos potencias elevándose se multiplican los exponentes 5^(a*b)=3125 Aplicamos logaritmos. 3125 = 5^5 (a*b)*...

Lo siento pero no se de ecuaciones diferenciales

En g18 =SI((D18-C18-E18)<=0;0;(D18-C18-E18)) Si es menor que 0 entonces se pone 0, y si es positivo

a) Se calcula haciendo d=1-p(1)-p(2)...p(5)=1-(1/8)-(1/8)-(1/12)-(1/4)-(1/4)=2/12=1/6 b) F(3.6)=p(1)+p(2)+p(3.6)=(1/8)+(1/8)+11/60=13/30 Para entre p(3) y p(4) has de ponderar los resultados, al estar el 3.6 más cerca del 4, la probabilidad del 4 es...

Supongo que la fórmula que planteas es dx/((x3)*raiz(a-x)). Metes el x3 dentro de la raíz. dx/raiz(x6(a-x)) Haces operaciones. dx/raiz(ax6-x7) Haces un cambio de variable t=ax6-x7 -> dt=6ax5-7x6 dx Queda dt/raíz(t) que se puede poner como t^(-0.5) La...

Public Sub separar_num() Dim texto As String Dim rango As Range texto = Range("A1") Set rango = Range("B1") Dim i As Integer For i = 1 To Len(texto) rango.Offset(0, i - 1) = Mid(texto, i, 1) Next i End Sub El A1 es donde tienes el texto El B1 es...

Es eso, si el polinomio es factorizado para que el polinomio sea 0, 1 de los factores ha de ser 0

La función ordenar esta mal. Debería ser así. De la otra manera no estas usando la i para nada int ordenar () { int aux; for (int i=0; i<10; i++ ) { for (int f=i+1; f<10; f++) { if (arreglo [i] > arreglo [f]) // if (arreglo [f] > arreglo [f+1]) { aux...