VBA rename a printer

[Liamfoxtrot]

I am looking to use VBA to change the name of a printer. I have USB printers and each one is named the same except the copy number. For example I have PrinterXX and PrinterXX (Copy 1) and PrinterXX (Copy 2). I would like to be able rename these in code. Has anyone done this is VBA before?

Thanks in Advance,
Andy

 

[BrianB]

In the absence of another reply .........

Printers are named by the Windows system so you will need to dig a bit to see if Excel can change that. May be possible. Perhaps using an API Function or making a change to the Windows Registry (not such a difficult/terrible thing as many make out).

I have not searched much but here is an API function to investigate :-

Private Declare Function OpenPrinter Lib "winspool.drv" Alias "OpenPrinterA" (ByVal pPrinterName As String, phPrinter As Long, pDefault As Any) As Long


It looks like it is "read only" - but I could be wrong.
Look for other API's with 'print' or 'printer'