첨부 파일 다운로드 파일 형식 파일 이름 및 ddmm

Question

첨부 파일을 다운로드하여 대상 폴더에 저장합니다. 실제로 파일 이름 + 오늘 날짜는 & 월 (예 : stat2909, repo2909)이며 첨부 파일 다운로드 전용 스크립트에 추가하고 싶습니다. 오늘날 날짜 파일. 어떻게하면 If UCase(Atmt.FileName) Like "stat& strDate" Or _으로 시도했지만 실패했는지 Dim strDate As String, strDate = Format(Now(), "ddmm")을 추가 할 수 있습니다. 어떻게해야합니까?

지금 내가 첨부

를 다운로드하려면이 옵션을 사용하고

For Each Atmt In item.Attachments 
If UCase(Atmt.FileName) Like "stat*" Or _ 
UCase(Atmt.FileName) Like "repo*" Then 

Answer 1

만 작은 오류 :

대신

만약 여기에 "통계 & strDate" '처럼 UCASE (Atmt.FileName) '& strDate'부분은 여전히 ​​텍스트의 일부입니다 ...

UCase (Atmt.FileName)와 같이 "stat"& strDate '가 strDate가 이미 채워져 있다고 가정합니다.

최대