Microsoft Office Forums

Go Back   Microsoft Office Forums > >

 
 
Thread Tools Display Modes
Prev Previous Post   Next Post Next
  #4  
Old 02-13-2020, 08:14 PM
NoSparks NoSparks is offline GetElementsByName with memo box Windows 7 64bit GetElementsByName with memo box Office 2010 64bit
Excel Hobbyist
 
Join Date: Nov 2013
Location: British Columbia, Canada
Posts: 842
NoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of light
Default

From a Google search that took me to this page, this seems to work.
Code:
Sub FormFillTest()

    Dim ie As Object

'Open Internet Explorer
Set ie = CreateObject("internetexplorer.application")

'have it visible
ie.Visible = True

'go to the site
ie.navigate ("https://mazzonicenter.freshdesk.com/support/tickets/new")

'wait until it's loaded
    Do Until ie.ReadyState >= 4
        DoEvents
    Loop

'put email address in text box
ie.document.getElementsByName("helpdesk_ticket[email]")(0).Value = "Testing@testing.com"

'put subject in text box
ie.document.getElementsByName("helpdesk_ticket[subject]")(0).Value = "Testing"

'put something in the TEXTAREA
ie.document.getElementsByClassName("redactor_editor")(0).innerText = "Hello World"

End Sub
Reply With Quote
 



Other Forums: Access Forums

All times are GMT -7. The time now is 10:21 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft