我几天以来都未能成功解决我的Google Aware Exception问题。
我确实实现了一个“意识快照客户端”,以解决我的上下文收集应用程序附近的当前POI。但不幸的是,我总是收到异常“ com.google.android.gms.common.api.ApiException:7508”,没有任何结果。我还实现了一个SnapshotClient来接收当前的天气状况,并且效果很好。几乎相同的代码,但是Weather的代码可以正常工作,而Places的代码则不能工作。
我现在正在浏览网络几天以解决此问题,但是没有有关该特定异常代码的信息,并且在官方android文档中也未进行处理。
请帮帮我!
我的代码是:
Sub AdgroupName()
Dim LrowBlk As Long
LrowBlk = Sheets("Bulk Sheet").Cells(Rows.Count, "H").End(xlUp).Row
Sheets("Bulk Sheet").AutoFilterMode = False
Sheets("Bulk Sheet").Range("H3:I3").AutoFilter field:=2, Criteria1:="AdGroup"
ActiveWorkbook.Sheets("Bulk Sheet").Range("H3:K3" & LrowBlk).SpecialCells(xlCellTypeVisible).Copy
Worksheets("Adgroup List").Paste Destination:=Worksheets("Adgroup List").Range("A1")
ActiveWorkbook.Sheets("Bulk Sheet").Range("P3:P" & LrowBlk).SpecialCells(xlCellTypeVisible).Copy
Worksheets("Adgroup List").Paste Destination:=Worksheets("Adgroup List").Range("E1")
With Sheets("Adgroup List")
.Columns("C:C").Cut
.Columns("E:E").Insert Shift:=xlToRight
End With
Application.CutCopyMode = False
Dim ws As Worksheet
Dim LrowSTR As Long
Set ws = ThisWorkbook.Sheets("Search Term Report")
LrowSTR = Sheets("Search Term Report").Cells(Rows.Count, "H").End(xlUp).Row
Dim Strformulas(1 To 3) As Variant
With ws
Strformulas(1) = "=VLOOKUP($K4,'Adgroup List'!$C:$D,2,0)"
Strformulas(2) = "=VLOOKUP($K4,'Adgroup List'!$C:$E,3,0)"
.Range("AJ4:AK4").Formula = Strformulas
.Range("AJ4:AK" & LrowSTR).FillDown
.Range("AJ3").Value = "Campaign ID"
.Range("AK3").Value = "AdGroup Name"
End With
Sheets("Bulk Sheet").AutoFilterMode = False
Sheets("Adgroup List").AutoFilterMode = False
End Sub
我是stackoverflow的新手,所以很抱歉,如果缺少任何东西或其他任何问题!
答案 0 :(得分:0)
检查并确保您具有Google Maps的API密钥。 您可以获取api密钥并通过Google API管理器启用。没有它,您将不会通过身份验证来访问地图。您可能会想到,地点在Google地图的背面。