LinguamortiS Bis

albert buscapolos Ing° respondió: Aparte de la sugerencia de Rober, Prueba con : Un diodo En paralelo con la carga o un varistor en paralelo con el contacto.

Dante Amor respondió: ¿Y cómo cargaste el array? Si estás trabajando con matrices, la matriz se carga en memoria, puedes hacer un loop a la matriz y cargar en una segunda matriz los datos filtrados. Como ambas matrices están en memoria, la respuesta debe ser inmediata....

Dante Amor respondió: Ya te había respondido esa duda. ¿Cuántas columnas tiene mi Array birideccional? Por ejemplo: Sub ary() Dim ary As Variant ' ary = Range("A1:D10").Value ' MsgBox "número de filas: " & UBound(ary, 1) & vbCr & _ "número de columnas: " & UBound(ary, 2)...

Dante Amor respondió: Cuando utilizas el método Find y FindNext, excel almacena en memoria las siguientes referencias, pero cuando eliminas una fila, como es este el caso, excel pierde la referencia de la fila, porque la fila fue eliminada y la siguiente fila se recorrió,...

Dante Amor respondió: Dentro de tu userform, por ejemplo en un botón, haces la llamada al código para limpiar el listbox y le pasas como parámetro el nombre del listbox Private Sub CommandButton1_Click() Call LimpiarListBox(ListBox1) End Sub En un módulo, pon este código:...

Elsa Matilde respondió: Lo que menciona Adriel es pertinente, hay que tener presente que las columnas se numeran a partir de 0 para el envío o lectura de algún valor. De todos modos, leyendo que '...Al hacer click en el listbox ...' creo que debieras cambiarlo por el evento...

Dante Amor respondió: Para saber el número de filas es con el 1: filas = ubound( matriz, 1) Si la matriz empieza a almacenar en el 0, entonces para el total de filas: filas = ubound( matriz, 1) + 1 Para saber el número de columnas es con el 2: columnas = ubound(matriz, 2)...

Poli Plos respondió: Puede probar con esta función: Public Function MiFuncion(ByVal strCadena As String) As String For Each strpalabra In Split(strCadena, " ") MiFuncion = MiFuncion & UCase(Left(strpalabra, 1)) Next End Function