תחומים - פורום חרדי מקצועי

במקום Alt+Enter תוסיף "CHAR(10)" (כמובן ללא המרכאות) למשל

=CONCATENATE(A1,CHAR(10),B1)

ותגדיר גלישת טקסט

@מעמד בבקשה
ועיין כאן

@יהודי-טוב הבנתי, הצעתי הוא לפתוח עוד עמודה בצמוד לעמודה הרצויה לעניינינו מספר טלפון שנניח זה בעמודה A ובעמודה B בשורה השניה (כי השורה הראשונה אם אתה רוצה לעשות מזה מיזוג דואר, אז חייב להיות כותרת...) תזין את הקוד

=TEXT(A2,"0##-#######")

ותריץ את זה על פני כל העמודה (ע"י דאבל קליק [-לחיצה כפולה] על המרובע המודגשת בזוית התא למטה בצד שמאל)
ולגבי הת.ז. תעשה את אותו דבר ואם העמודה של הת.ז. הוא למשל בעמודה C תזין בעמודה לידו (D) בשורה 2 כנ"ל את הקוד

=TEXT(C2,"[$-,100]000000000")

ותריץ את זה כנ"ל.
ובמיזוג הדואר תיקח את הנתונים מהעמודות עם הקוד, תנסה ואם יש בעיות ננסה בס"ד לעזור לך, אבל לא אמור להיות בעיות...
בהצלחה.

@יהודי-טוב אתה אתה לוחץ קליק ימיני על השדה (בוורד) ומוסיף 0 לפני, עיין בתמונה

לפעמים אנחנו מריצים מאקרו והמאקרו פועלת הכמה מקומות ולאחר שהוא גומר את כל הפעולות, נשאר בתא האחרון בה ביצע את הפעולה האחרונה. (או בתא אחר שהגדירו במאקרו שיעמוד.)
לפעמים רוצים שהמאקרו ירוץ אך לא יתקע בתא מסויים אלא שיחזור לאותו תא בה הוא עמד כשהריצו את המאקרו.
המאקרו שלפניכם יחזור לאותו מיקם בה הייתם בעת הרצת המאקרו.
מיד בהתחלת הקוד אחרי ההתחלה:

Sub ????????()

מכניסים בזכרון את התא הפעיל:

Dim i
i = ActiveCell.Address

וממש בסוף לפני הסיומת

End Sub

כותבים שהוא יחזור למקום שבו היה (שהמקום הזה בעצם עדיין בזכרון שלו). כך:

Range(i).Select

לסיכום:

Sub ????????()
Dim i
i = ActiveCell.Address
    ?
    ?
    ?
    ?
    ?
    ?
    ?

    Range(i).Select
End Sub

אם אתה רוצה לחפש בגיליון עם המון שורות (דהיינו שאתה לא יכול לראות את כל החומר בבת אחת) אז זה לא פתרון מושלם...
כאן ישנו מדריך איך עושים כזה דבר, ותשנה רק את טווח העמודות בהם אתה רוצה שיחולו (זה עובד שהוא יכול לצבוע כמה עמודות ביחד ז"א שאם "משה" מופיע בתא D22 אז נצבע לך כל שורת 22 על כל עמודותיה (כמובן באם הגדרת חיפוש בכל העמודות, באם הגדרת חיפוש רק בעמודות A B D F למשל, הוא יצבע רק את אותם עמודות אך גם יחפש רק באותם עמודות)
אך יש חסרון שהוא לא מפנה אותך לתא המסומן רק תצטרך לחפש היכן מסומן התא ולכן הקדמתי שזה תועלתי אם כל החומר לנגד עינך אחרת אולי יצא שכרו בהפסדו.

מה שכן הצעתי, זה לעשות פקודת מאקרו לחיפוש ואח"כ הוא יצבע את זה ויפנה אותך לתא. אך אני לא מצאתי כזה פונקציה בVBA ולמומחים פתרונים...

אם זה CSV, תפתח את הקובץ בפנקס רשומות ותשמור את זה כמו שהיא אך בפורמט ANSI

@dovid יש לי טבלת נתונים בHTML שאופן עריכת הנתונים בצורה הכי קלה בשבילי ובשביל המשתמשים הוא ע"י קובץ אקסל ובאקסל אני מייצא (ע"י מאקרו) קובץ בתבנית אובייקט מערך שהוא בעצם ה-src של הHTML .
הייתי רוצה שיש כפתור בדף הHTML שזה פשוט יפתח את הקובץ אקסל העורך.

@5566brs פתחתי נושא חדש כפי בקשתך וכפי נוהל הפורום. תודה על הסבת הלב.

ולגבי התשובה שלך, אין לי קובץ אקסל פתוח, אני רוצה לפתוח קובץ קיים מחדש.
אם יש אפשרות של שליחת מקשים, יכול להיות שאני אסתדר.

@בערל לתשומת לבך, הוא לא שאל עדיפות של מקיטה ובוש אלא עדיפות של בוש ו-Milwaukee ולכן המילה "מקיטה עדיף" אין לזה מקום .
ולעצם הענין - אכן על מקיטה אין עוררין. וכבר היה כאן אשכול מלא בנושא זה (אם כי לא ספיציפית על השאלה הזאת).
בהצלחה.

@מעמד כן.

@WWW יש כמויות של דגמים של מברגות מקיטה (משהו בסביבות המאתיים) ואני לא זוכר את הדגם של המברגה במדוייק אבל זה 18V.
לגבי המחיר אני לא זוכר בדיוק כי קניתי אצלו 3 כלים עם 3 בטריות של 5 אמפר בסביבות ה-3200 ש"ח. בשעתו ערכתי שיעורי בית והוא יצא לי הכי זול.
זה המברגה הזאת

@yits אמר במברגה בזול:

ה שווה?
אני חושב שיש לו מתח של 110v בלב

יש בן אדם פרטי בבני ברק (שעושה משלוחים בעלות סמלי) שמוכר כלי עבודה איכותיים מהחברות המובילות במחירים ממש מוזלים עם אחריות לשנה. אני קניתי שמה הרבה כלים של מקיטה ואני מאוד נהנה מזה. הוא טוב לייעוץ (-הוספה שלי- כמובן לא לייעוץ גרידא אלא מה לקנות אצלו).
מספר הפלפון שלו זה 0527654234

תשאל למוביל שמתעתד להעביר הדירה שלך (בשעטומ"צ) אם יש לו, בדר"כ למובילים יש קרטונים.

אגב באימות נתונים יש אפשרות באופציית "רשימה" בשדה "מקור" פשוט להזין נתונים ולאו דווקא מתוך רשימה לדוגמא:

ואז בתא יופיע:

ןאם אח"כ נרצה להחליף או להוסיף ברשימה דברים, אז נעשה את זה בתוך החלונית ולשים לב לסמן את ה-V למטה:

@חנון-המרבה אמר בטיפ במאקרו בתוכנת אקסל:

אני לא יודע אם פתחת נושא חדש על זה או לא בכל מקרה התשובה היא

i = ActiveCell.Value

@The-shadow אמר בטיפ במאקרו בתוכנת אקסל:

טיפ מעולה

שאלה קטנה

איך אני מכניס במשתנה את הטקסט שהתא מכיל?

אם הבנתי נכון את שאלתך זה אמור להיות כך: (לקחתי את תא A4 כדוגמא).

i = Range("A4").value

@nach אמר בחיפוש והחלפה באקסל:

למה להסתבך? אתה יכול להפעיל את החיפוש ואז לסנן לפי צבע!! אחרת מה הענין?! (אם תתעקש על מאקרו, פה אתה וודאי תסתדר להקליט מאקרו שסה"כ ממיין לפי הצבע!)

זה לא ענין של להסתבך אלא פשוט לא צריכים שכל חיפוש יהיה מורכב מכמה פעולות, ולגבי הטווחים, אפשר להגדיר ב"חל על" רק עמודה מסויימת אבל החיפוש (בנוסחה) יהיה על הכל וכך רק התא יצבע ולא כל השורה אבל גם כאן זה אליה וקוץ בו כי יצטרכו לעשות עיצוב מותנה אמנם עם אותו נוסחה אבל על כל עמודה ועמודה.
אבל זה בין כל לא רלוונטי אחרי הפתרון הגאוני ש@zvinissim הביא לכאן (אם כי שזה טיפה מרגיש כשלא צריכים את זה)

אדיר !!!!
ולגבי החיפוש שלא מוצא, כנראה מוגדר אצלך באפשריות חיפוש "התאם את כל תכולת התא"

בהצלחה.

@yossiz מסתבר...

כנ"ל הקוד ה-VBA של המאקרו אינו כרגע תח"י וכשיהיה לי את זה אני יעלה את זה לפה..
תודה..