Hi guys,
I just found a snippet of code for taking a photo with the webcam using microsoft Excel:
CommandBars.FindControl(ID:=1764).Execute
I'd very much like to use this in Visio, which we'll be using to take photos on tablets. I've searched the code, but can find nothing in the Vision msdn documentation:
https://msdn.microsoft.com/en-us/library/office/ff765940.aspx
or the object browser in commandbuttons. Has anyone done this before? or is there perhaps a standard windows version i can call from the command line?
Tom:
You could cheat and use Excel VBA within Visio. Just add a reference to the Excel Object Library via the VBA UI and have at it.
Sub SmileForTheCamera()
Dim ExcelApplication As Variant
On Error Resume Next
Set ExcelApplication = GetObject(, "excel.application")
If ExcelApplication Is Nothing Then
Set ExcelApplication = CreateObject("excel.application")
End If
On Error GoTo 0
ExcelApplication.CommandBars.FindControl(ID:=1764).Execute
End Sub
Hope this helps,
- Ken
Thanks same prob here