第一次在这里,所以我希望得到我的答案,我查看了整个谷歌,但我找不到答案。
嗯,我得到了VBA代码,它在Exel上刷新SQL中的代码。
VBA代码:Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False
它每次询问我的ODBC登录/密码时,我都会尝试手动刷新,我希望通过将这些信息直接保存在Excel单元格或VBA中自动运行(我更喜欢在“Valida o de Dados”工作表中的excel单元格中链接的变量)。在此之后,通过强制用户在表单中插入这些信息(以保持更好的外观)来使其更好。但是问题是,每次我试图运行这个宏时,它都会
我想从本地机器打开Putty,自动登录到服务器,并使用Excel VBA脚本在putty的同一会话中运行shell脚本。下面的代码可以很好地打开putty。
Sub open_putty()
Dim UserName 'assign user name
Dim Passwrd 'assign password
Dim TaskID As Long
pc1 = "C:\Users\Desktop\putty.exe -ssh " & UserName & "@servernamee -pw " &am
我是VBA的新手。我正在创建vba登录到网站并获取信息,但是当我尝试登录它时,请求captcha。我需要一个代码,直到captcha被输入和表单提交。请帮帮我。
Sub iepart2()
Dim ie As Object
Set ie = CreateObject("internetexplorer.application")
With ie
.Visible = True
.navigate "http://adb.in/ser/"
Do While .busy
我有一些VBA代码,它使用Putty的pscp.exe文件来登录Unix服务器。我使用的是Windows 7。
问题是用户名包含@字符。如果我使用以下VBA代码,则无法登录。
那么,我应该如何替换Username = "user@example.xxx"才能登录呢?
Dim Host As String
Host = "grid1.example.xxx"
Dim Username As String
Username = "user@example.xxx"
Dim Password As String
Password = "Pa
有没有可能自动化的登录页面使用vba,其中有一个鼠标向下和鼠标向上点击。当我点击一个登录按钮,它有一个鼠标向下点击,因为它没有任何按钮,以便自动化使用vba。
请让我知道是否可以在vba中使用一些函数来执行此操作
请复制网址并粘贴到互联网标签:"“。单击URL后,您将输入到Ariba Discovery站点,在那里您将看到此Ship to Service location字段。在ship to service location字段中有多个位置,我们需要单击"Show more“。点击show more,如果我们看到html代码,它不是一个自动点击的按钮。它是awmouseup,
我正在用Excel在书中做一个标记,用VBA编写代码。我有一个选项卡和表单来键入您的信息,另一个选项卡用于登录时存储的详细信息,另一个选项卡用于搜索已登录的用户。我保护了Sheet1(登录),也需要Sheet2(日志簿)的保护。
问题问题是,在Sheet2(日志簿)上,我希望VBA能够在下一个可用的行中添加用户的信息,同时保护它,这样就没有人可以查看和更改其他信息了。以下是我尝试过的失败代码:
Private Sub Worksheet_Open()
Worksheet.Protect "Password", UserInterfaceOnly:=True
End Su
我正在使用以下代码登录Facebook与VBA。
Sub LoginFb()
Dim IE As Object
Set IE = CreateObject("INTERNETEXPLORER.Application")
IE.Navigate ("www.Facebook.com")
IE.Visible = True
Do While IE.Busy
DoEvents
Loop
IE.Document.all.Item("email").Value = "u
简而言之:我想要监控我使用配置文件的网站上的一些东西(一些KPI)。
我见过很多使用VBA和IE登录网站并检索数据的例子。这将是我的解决方案(即通过IE定期登录并保存cookies,使用VBA/IE打开网站,使用HTML元素抓取数据)。
Sub GetData()
Dim appIE As Object
Set appIE = CreateObject("internetexplorer.application")
With appIE
.Navigate "URL"
.Visible = True
End With
Do While app
我的总体目标是登录到一个网站,并下载一个特定的链接,位于该网页-所有这些都通过一个VBA宏。
但是,对于这个特定的网站,我甚至不能查看页面的源代码来查看用户名/密码变量,就像这里建议的那样:
这就是网页的样子:
我无法查看源代码,因为正如您所看到的,在通过身份验证之前,我看不到从服务器返回的任何内容。
我有功能代码来打开浏览器。只是不登录。
Sub OpenInFireFoxNewTab(url As String)
Dim pathFireFox As String
'
pathFireFox = "C:\Program Files (x86)\Mozill
我正在尝试使用VBA从本地access数据库自动输入web数据。
导航到网站后,登录页面将重定向到主菜单。但是,IE对象的document属性不返回任何内容。
Dim htmlDoc As MSHTML.HTMLDocument
Set IE = CreateObject("InternetExplorer.Application")
IE.navigate "http://some.website.com.au/"
IE.Visible = True
With IE
Do Until .ReadyState = 4
Loop
End with
我正在尝试通过Excel上的VBA代码连接到SQL。
问题是,当我用我的用户名登录时,我可以毫无问题地连接到数据库。但是当我尝试与其他登录的用户连接时,连接不成功。
我已经在我的数据库中创建了一个用户,如下图所示:
我在VBA上的连接是这样完成的:
Option Explicit
Public DB As New ADODB.Connection
Public RST As New ADODB.Recordset
Public caminho, strConn As String
Public Msg As String
Sub CONECTA_DB()
strConn = &
我是一个业余的非常有限的能力,运行一些VBA代码刮一个网站对我很重要。我希望这个程序能在我的笔记本电脑上全天候可靠地运行,但由于家庭WiFi退出、微软更新等原因,我无法做到这一点,所以我尝试使用运行Excel2016的Windows10虚拟机在亚马逊网络服务上运行该程序。下面这段VBA代码在我的笔记本电脑上运行良好,但在AWS虚拟机上运行时失败。首先,在我的浏览器中使用internet Explorer的AWS中,通过键盘和VBA,此网站的登录页面不会显示电子邮件地址和密码的输入框,直到我将其设置为受信任的站点。(在Firefox上没有任何问题,但我在VBA程序中坚持使用internet Ex
我使用VBA和Selenium ChromeDriver在一个需要身份验证的网站中进行数据抓取。
问题是,ChromerDriver似乎在代码中的任何中断中重新启动(即使它不是一个错误,例如,当应用程序要求用户输入时)。
' Loads search page
Set chrome = New Selenium.ChromeDriver
Do
chrome.get sfSearchURL
If chrome.URL <> sfSearchURL Then 'If it is not in desired search page, prompts
我对使用VBA和Selenium相当陌生,我试图使用VBA访问并登录到,以便从站点编译数据。我有问题,针对用户名和密码文本框,并让它登录。
我已经在Internet上尝试过了,当我接近让它开始工作的时候,我发现ShipStation在Internet上运行不好。这就是使用硒铬的原因。
Option Explicit
Private Chrome As New ChromeDriver
Sub ChromeAuto()
Chrome.Start: Chrome.get "https://ss.shipstation.com/"
Do While Chro
我有一个函数,它使用windows获取当前的windows用户登录()。
Private Declare PtrSafe Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
' Main routine to Dimension variables, retrieve user name.
Public Function WindowsUserName() As String