
Ayuda con una llamada a una macro en VB desde excel
Publicado por Alfonso (1 intervención) el 22/08/2021 22:46:10
Buenas a todos. Tengo un boton en excel que llama a esta funcion en VB, pero me da el error: "invalid procedure call or argument".
Segun creemos el codigo esta bien pero no se si es la llamada, alguna de las opciones del boton..
--------
Se agradece toda ayuda.
Un saludo.
Segun creemos el codigo esta bien pero no se si es la llamada, alguna de las opciones del boton..
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Sub Cadenas()
x = 1
y = 1
While Cells(x, 1) <> ""
Surname = ""
Name = ""
For Each Item In Split(Cells(x, y))
If Asc(Mid(Item, 1, 1)) = Asc(UCase(Mid(Item, 1, 1))) And Asc(Mid(Item, 2, 1)) = Asc(UCase(Mid(Item, 2, 1))) Then
Surname = Surname & " " & Item
Else
Name = Name & " " & Item
End If
Next Item
Cells(x, 2) = Trim(Surname)
Cells(x, 3) = Trim(Name)
x = x + 1
Wend
End Sub
Se agradece toda ayuda.
Un saludo.
Valora esta pregunta


0