اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

نقل فولدر إلى فولدر آخر بتحقق شرط معين


الردود الموصى بها

السلام عليكم ورحمة الله وبركاته 

أحبتي في الله، أريد نقل فولدر تلقائي إذا تحقق الشرط المطلوب في  c5

وباقي  الشرح في الملف المرفق

مجلد جديد ‫‬.rar

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله وبركاتة

 

هل من الممكن  نقل فولدر كامل- الي  فولدر الخالص اذا تحقق الشرط المطلوب في عمود c5  مجلد جديد ‫‬.rar

تم تعديل بواسطه محمد يوسف
رابط هذا التعليق
شارك

هل ممكن ان يتم نقل فولدر الي فولدر اذا تحقق شرط في عمود c5 

ارجو من اساتذة وخبراء هذا المنتدي الجميل  الرد -  مثال  مجلد جديد ‫‬.rar

رابط هذا التعليق
شارك

يمكنك استخدام هذا الكود

Sub sbCopyingAFile()

'Declare Variables
Dim FSO
Dim sFile As String
Dim sSFolder As String
Dim sDFolder As String

'This is Your File Name which you want to Copy
sFile = "Sample.xls"

'Change to match the source folder path
sSFolder = "C:\Temp\"

'Change to match the destination folder path
sDFolder = "D:\Job\"

'Create Object
Set FSO = CreateObject("Scripting.FileSystemObject")

'Checking If File Is Located in the Source Folder
If Not FSO.FileExists(sSFolder & sFile) Then
    MsgBox "Specified File Not Found", vbInformation, "Not Found"
    
'Copying If the Same File is Not Located in the Destination Folder
ElseIf Not FSO.FileExists(sDFolder & sFile) Then
    FSO.CopyFile (sSFolder & sFile), sDFolder, True
    MsgBox "Specified File Copied Successfully", vbInformation, "Done!"
Else
    MsgBox "Specified File Already Exists In The Destination Folder", vbExclamation, "File Already Exists"
End If

End Sub

 

رابط هذا التعليق
شارك

استاذ أحمد يوسف اشكرك  بارك الله فيك  علي الرد ولكن ليس هذا المطلوب 

المطلوب   انا عندي عدد عملاء كبير   وكل العملاء مديونين وكل عميل في ملف منفصل اريد عندما يتم  سداد عميل يتم نقل الفولدر والملف الخاص به الي فولدر الخالص تلقائي

باقي شرح مجمع الفواتير.rar

استاذ أحمد يوسف اشكرك  بارك الله فيك  علي الرد ولكن ليس هذا المطلوب 

المطلوب   انا عندي عدد عملاء كبير   وكل العملاء مديونين وكل عميل في ملف منفصل اريد عندما يتم  سداد عميل يتم نقل الفولدر والملف الخاص به الي فولدر الخالص تلقائي

باقي شرح مجمع الفواتير.rar

استاذ بن علية حاجي اشكرك  وبارك الله فيك  علي الاهتمام بالموضوع   

المطلوب   انا عندي عدد عملاء كبير   وكل العملاء مديونين وكل عميل في ملف منفصل اريد عندما يتم  سداد عميل يتم نقل الفولدر والملف الخاص به الي فولدر الخالص تلقائي

باقي شرح مجمع الفواتير.rar

رابط هذا التعليق
شارك

اخي  أحمد يوسف  اشكرك وبارك الله فيك 

الكود ليس بعاجبني ولكن الكود لم  يقوم بنقل الفولدر تلقائي الي فولدر الخالص

لو تكرمت حضرتك  ممكن  تيطبق الكود علي الملف 

 

جزاك الله كل خير 

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information