我正在使用Sub Yo2()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
' Use last cell in UsedRange for its row number,
Dim lastrowsheet2 As Long
lastrowsheet2 = ThisWorkbook.Sheets("Location File Data").UsedRange.Rows.CountLarge
If lastrowsheet2 = 1 Then lastrowsheet2 = 0
Dim userinput As String, DateInput As String
userinput = InputBox("Enter a value to search for.", "Column A Search")
DateInput = InputBox("Enter a date to search for.", "Column AN Search")
Dim findrange As Range
Dim firstaddress As String
Set findrange = ThisWorkbook.Sheets("Sheet1").Columns("A").Find(what:=userinput, lookat:=xlWhole, LookIn:=xlValues)
If findrange Is Nothing Then
MsgBox "No matching search results"
Else
firstaddress = findrange.Address
Do
If DateValue(DateInput) = Sheets("Sheet1").Cells(findrange.Row, "AN").Value Then
lastrowsheet2 = lastrowsheet2 + 1
ThisWorkbook.Sheets("Location File Data").Range("A" & lastrowsheet2, "AN" & lastrowsheet2).Value = ThisWorkbook.Sheets("Sheet1").Range("A" & findrange.Row, "AN" & findrange.Row).Value
End If
Set findrange = ThisWorkbook.Sheets("Sheet1").Columns("A").FindNext(findrange)
' Loop until the Find has wrapped back around, or value not found any more
Loop While Not findrange Is Nothing And findrange.Address <> firstaddress
End If
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub
主题react-native。现在我想使用native-base包。但是我需要从两个包中使用Button但是我遇到了重复的标识符错误。
react-native-share我可以知道如何从import Share, { ShareSheet, Button } from 'react-native-share';
import { Button } from 'native-base';
声明另一个按钮吗？
答案 0 :(得分：3)
请尝试使用：
Import { Button as Btn } from 'native-base'
这可以解决您的问题。