فیلتر وضعیت سؤال
برو به
به پشتیبانی نیاز داری؟
در صورتی که
- در کار با بتازون مشکلی دارید
- در مورد خدمات بتازون سؤالی دارید
- نظراتی را برای ارتقا و بهبود خدمات دارید
خوشحال میشیم که حتماً با ما در میان بزارید
سؤالات مربوط به VBA در اکسل
تابع sum در vba
11 ماه پیش توسط علی صالحی پرسیده شد
سوالم را داخل عکس گذاشتم. کاربرد ونقطه :
مثلا رنج a1 تا a5را با : تعیین میکنیم
ولی من با توجه به حلقه ای تعریف کردم مجبورم یکی از سلولها را با رنج یکی از سلولها را با سلز بنویسم که دیگر : جواب نمیدهد
اولین نفری باشید که به این سؤال پاسخ میدهد
انتقال اطلاعات به فایل ورد با VBA
11 ماه پیش توسط مهدیه مهدیه پرسیده شد
سلام وقت بخیر، در صورت امکان می خواستم کدی بنویسم که با انتخاب دکمه، اطلاعات داخل محدوده مشخص شده g8 به یک فایل word انتقال پیدا کند
اولین نفری باشید که به این سؤال پاسخ میدهد
تبدیل جدول به pdf
1 سال پیش توسط رضا صالحی پرسیده شد
سلام چگونه جدولی که در UserForm1-Frame1 طراحی شده را به pdf تبدیل کنم
اولین نفری باشید که به این سؤال پاسخ میدهد
انتقال محتوای متغیر
1 سال پیش توسط سروش فتحی پرسیده شد
سلام وقت بخیر
ضمن تشکر،من چند تابع مختلف برای یک برنامه تعریف کردم که داخل برنامه اصلی از اونا استفاده کنم
چطور میتونم یک متغیر با همون مقدار نهایی تاب خودش از داخل این تابع در تابع دیگر یا حتی برنامه اصلی استفاده کرد.
مثلا تابع زیر در نظر بگیرید میخام مقدار نهایی پارامتر i در تابع اصلی استفاده شودe
as boolean ( byval a as integer)
function f
for i = 2 to 100
then f=true:exit function if 1=a/i
next i
اولین نفری باشید که به این سؤال پاسخ میدهد
تابع سام به وسیله VBA
1 سال پیش توسط صابر صابر پرسیده شد
سلام دوستان ..... اصل سوال اینه که میخوام تابع sum در یک سلول قرار داده بشه و سلول های در ستون مجاور را به صورت داینامیک تشخیص بده و جمع بزنه
یک فایل نمونه قرار میدم ... در فایل با کلیک روی ثبت و جدید ماکرو اجرا میشه و فاکتور ثبت میشه در شیت یک میخوام قیمت محصولات مربوط به هر فاکتور به صورت داینامیک جمع بشن.... یعنی قیمت هایی که در ستون 14 هست مربوط به هر فاکتور در ستون 15 جمع بشه و قرار بگیره
امیدوارم بتونم محبت شما را جبران کنم
آخرین پاسخ: 1 سال پیش توسط صابر صابر
عدم اجرای یک فایل ماکرو نویسی شده در دو سیستم متفاوت
1 سال پیش توسط محسن دستگردی پرسیده شد
با سلام
من یه کد ماکرو نویسی کردم ، توی سیستم خودم اجرا میشه بدون خطا، اما در سیستم های دیگه اجرا نمیشه ایراد کد من چیه ممنون میشم بهم جواب بدین
کدمن:
Sub Macro9()
'
' Macro9 Macro
'
'
Range("G6").Select
Sheets("database").Select
Range("A1:P1").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$P$1000000").AutoFilter Field:=16, Criteria1:="51"
Columns("A:P").Select
Selection.Copy
Sheets("outputmashmul51").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
''Range("Q2").Select
''Application.CutCopyMode = False
''Selection.AutoFill Destination:=Range("Q2:Q508")
''Range("Q2:Q508").Select
Dim numRows As Long
numRows = Cells(Rows.Count, 1).End(xlUp).Row
Range("Q2").Select
Application.CutCopyMode = False
Selection.AutoFill Destination:=Range("Q2:Q" & numRows)
Range("A1:Q1").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$Q$1000000").AutoFilter Field:=17, Criteria1:= _
"گردش حساب و محاسبه پرونده اخذ گردد"
Columns("A:A").EntireColumn.AutoFit
Sheets("baresi").Select
Range("G6").Select
End Sub
آخرین پاسخ: 1 سال پیش توسط علی محمد یاوری
درگ کردن یا اتوفیل با vba
1 سال پیش توسط محسن دستگردی پرسیده شد
حل شده
10پاسخ
با سلام
چگونه برای درگ کردن یک سلول در ستون متغیر(اتوفیل متغیر) در ماکرو ایجاد بکنیم
شرح سوال اینه :
در کدماکرو زیر
Range("F4:F5").Select
Sheets("nezarat").Select
Columns("A:P").Select
Selection.Copy
Sheets("output1").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Columns("F:I").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlToLeft
Rows("1:1").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$P$1817").AutoFilter Field:=11, Criteria1:="2"
ActiveSheet.Range("$A$1:$P$1817").AutoFilter Field:=7, Criteria1:= _
"=گروه چهارم"
ActiveWorkbook.Worksheets("output1").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("output1").AutoFilter.Sort.SortFields.Add Key:= _
Range("I1:I1817"), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption _
:=xlSortNormal
With ActiveWorkbook.Worksheets("output2").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Range("I4").Select
Sheets("NEZARATT").Select
Range("F4:F5").Select
Sheets("nezarat").Select
Range("B5").Select
در کدهای فوق که بولد کردم و زیر آن خط کشیدم بازه های من متغیر است ممکن است در دیتا بیسی 100000 ردیف باشه و در دیتا بیس دیگری کمتر یا بیشتر
چطوری و با چه کدی این مشکل رو حل کنم هم در قسمت فیلتر کردن و هم در قسمت اتو فیل کردن من این مشکل رو دارم
ممنون میشم کامل توضیح بدین.
آخرین پاسخ: 1 سال پیش توسط محسن دستگردی
جلوگیری از ورود داده های تکراری
1 سال پیش توسط احسان غلامی پرسیده شد
حل شده
1پاسخ
باسلام
یوزر فرمی طراحی شده و یکسری اطلاعات داره توی فرم وارده میشه و سپس از طریق کلید ثبت اطلاعات توی جدول اکسل ثبت میشه
توی یوزر فرم 4 تا خط تولید وجود داره و اطلاعات روزانه پر میشه. مشکل اینجاست که اگر کاربر اطلاعات تکراری مثلا برای خط تولید شماره 1 در تاریخ های یکسان 2 بار وارد کنه. اطلاعات ثبت میشه. خواستم راهنمایی بفرمایید این مشکل رو چطوری میتونم حل کنم
آخرین پاسخ: 1 سال پیش توسط علی محمد یاوری
ابزار Goal Seek در VBA
1 سال پیش توسط رضا معدن نژاد پرسیده شد
سلام وقت بخیر
لیست حقوق و دستمزدی از پرسنل دارم که میخوام خالص پرداختی رو به مبلغ قرارداد برسونم اینکار رو با Goal Seek انجام میدم از اونجایی که تعداد نفرات زیاد هستن نمیشه نفر به نفر اینکار رو انجام داد. حالا میخوام بدونم چه کدی داخل VBA نوشته بشه که این عملیات تکرار بشه تا آخرین نفر لیست
آخرین پاسخ: 1 سال پیش توسط علی محمد یاوری
حذف محدوده با vba
1 سال پیش توسط مهدیه مهدیه پرسیده شد
با عرض سلام و وقت بخیر خدمت اساتید محترم:
در یک فایل اکسل که یک سری مشخصات وارد شده باشد از محدوده b3تا j3 و ادامه دار هستش و همچنین b3 به پایین مختص شماره ردیف می باشد. اگر بخواهیم در یک سلول مشخص و ثابت مثلآ a5 زمانی که شماره ردیف را وارد کنیم اون ردیف مورد نظر از b تا j حذف بشه و همچنین در یک شیت دیگر paste بشه البته با vba . راه حلش چیه؟
در صورت امکان راهنمایی بفرمایید
آخرین پاسخ: 1 سال پیش توسط علی محمد یاوری