Laufzeitfehler mit Formel
22.01.2022 15:56:14
Dino
ich habe in Zelle M3 diese Formel stehen:
="INSERT INTO `p_employees` (`display_name`, `first_name`, `last_name`, `email`, `telephone`, `mobile`, `company`, `department`, `location`, `distinguishedName`, `username`) VALUES ("&"'"&A55&"',"&"'"&B55&"',"&"'"&C55&"',"&"'"&D55&"',"&"'"&E55&"',"&"'"&F55&"',"&"'"&G55&"',"&"'"&H55&"',"&"'"&I55&"',"&"'"&J55&"',"&"'"&K55&"'"&") ;"
Per VBA soll diese Formel in M3 eingetragen und bis nach unten übertragen werden.
Sub Formel_M()
Range(Cells(3, 13), Cells(Cells(Rows.Count, 1).End(xlUp).Row, 13)).FormulaLocal = "=INSERT INTO `p_employees` (`display_name`, `first_name`, `last_name`, `email`, `telephone`, `mobile`, `company`, `department`, `location`, `distinguishedName`, `username`) VALUES (""&""'""&A3&""',""&""'""&B3&""',""&""'""&C3&""',""&""'""&D3&""',""&""'""&E3&""',""&""'""&F3&""',""&""'""&G3&""',""&""'""&H3&""',""&""'""&I3&""',""&""'""&J3&""',""&""'""&K3&""'""&"");"
End Sub
Beste Grüße,
Dino
Anzeige