Mrrrr's Forum (VIEW ONLY)
Un forum care ofera solutii pentru unele probleme legate in general de PC. Pe langa solutii, aici puteti gasi si alte lucruri interesante // A forum that offers solutions to some PC related issues. Besides these, here you can find more interesting stuff.
Lista Forumurilor Pe Tematici
Mrrrr's Forum (VIEW ONLY) | Reguli | Inregistrare | Login

POZE MRRRR'S FORUM (VIEW ONLY)

Nu sunteti logat.
Nou pe simpatie:
Profil alexxandra
Femeie
24 ani
Timis
cauta Barbat
24 - 57 ani
Mrrrr's Forum (VIEW ONLY) / Tutoriale si Ghiduri Utile // Tutorials and useful guides / [EXCEL] ActiveWorkbook.SaveAs Type mismatch error 13 [VBA] Moderat de TRaP, TonyTzu
Autor
Mesaj Pagini: 1
TRaP
Moderator

Inregistrat: acum 6 ani
Postari: 739
On my PC I don't have this problem when using the following line in a code, but on another PC I get type mismatch on the line and can't save the file.

ActiveWorkbook.SaveAs Filename:=Environ("USERPROFILE") & "\Desktop\COMENZI " & Year(mDATA.Text) & "\" & docName & ".xlsx"

docName was defined as:

Dim docName As String
    docName = "Something - " & mFIRMA.Text & "   " & mCOMANDA.Text & "  " & mDATA.Text


The problem seems to be the fact that docName is not a string.
For some reason on my PC it doesn't care but on another PC in the exact same conditions, same Office version etc. it serves me with Error 13 Type Mismatch.

The solution could be:
Dim docName As Variant

More on how to use ActiveWorkbook.SaveAs:


pus acum 3 ani
   
Pagini: 1  

Mergi la