ברוך הבא, אורח
שם משתמש: סיסמא: זכור אותי

דיון: יצוא אובייקט של QV כקובץ tab delimted

יצוא אובייקט של QV כקובץ tab delimted 9 years 1 day ago #7092

  • guya
  • guya's Avatar
  • Offline
  • Fresh Boarder
  • הודעות: 12
  • קרמה: 0
יש לי קובץ QV שיוצר טבלה פשוטה למדי אותה אני מייצא לאקסל בעזרת מאקרו:
Sub Export1
set sht2 = ActiveDocument.GetSheetByID("SH01")
set tbl2 = sht2.SheetObjects("CH1761")
"C:\QV\Development\Guy\INVSTATS.CSV"
END SUB

הקובץ הזה אמור להיקרא בממשק לפריוריטי ולכן לא יכול להיות מוצג כאקסל אלא כקובץ txt שהוא tab delimited.
כאשר ניסיתי לשנות את הסיומת של הקובץ מ-CSV ל-TXT יוצא לי מסמך טקסט בג'יבריש, אשמח אם למישהו יש רעיון איך לייצא את האובייקט בצורה תקינה.

תודה
הנהלת האתר ביטלה גישת כתיבה ציבורית.

תגובה:יצוא אובייקט של QV כקובץ tab delimted 8 years 10 months ago #7168

קודם כל - במאקרו שלך חסרה פונקציית Export (אני מניח שבטעות פשוט לא העתקת אותה לפוסט).
מוזר לי שיצא לך ג'יבריש. קובץ CSV הוא קובץ טקסט לכל דבר ועניין, שהשדות בו מופרדים בפסיק (אתה לא צריך לשנות את שם הקובץ - פשוט פתח אותו ב-Notepad).
בכל מקרה תוכל לייצא ידנית את האובייקט ע"י קליק-ימני ו-Export ואז בסוג הקובץ לבחור Tab Delimited.
אמנם פונקציית המאקרו Export מקבלת "מפריד" כפרמטר, אבל לא הצלחתי להעביר לה את תו ה-"טאב" כמפריד.
הנהלת האתר ביטלה גישת כתיבה ציבורית.

תגובה:יצוא אובייקט של QV כקובץ tab delimted 8 years 10 months ago #7170

היי,
הפונקציה export במאקרו היא ישנה
בגרסה 9 נדמה לי יצאה פונקציה חדשה הנקראית
ExportEx
לפונקציה זו מספר פרמטרים:
שם הקובץ ליצוא מחרוזת המכילה את שם הקובץ כולל מסלול

פורמט: מקבל אחד הערכים הבאים
0 - HTML
Text Delimited - 1
Bitmap Image - 2
XML - 3
QVD - 4
Biff-Excel - 5

לאחר מכן יש 3 פרמטרים שאינם חובה
true/false
מציין האם יש להוסיף לקובץ או לדרוס אותו. רלוונטי כמובן רק לסוגי יצוא מסוימים

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

Code Page Number
במידה ורוצים לעבוד עם סט תווים אחר
לדוגמא:
1200=Unicode
65001=UTF-8

שימו לב שהפונקציה גם מחזירה ערך False במקרה והיצוא נכשל
דוגמא לשימוש:
set obj = ActiveDocument.GetSheetObject("CH01")
obj.ExportEx "C:\test.qvd", 4

בנוסף קיימות מספר פונקציות נוספות יחודיות לפורמטים מסוימים
כגון
ExportBitmapToFile המיצאת אוביקקט או גליון לתמונה
ExportHtml המיצאת למבנה HTML
ועוד.....
אבל הם נמצאות בעקר לתמיכה בגרסאות קודמות

לגבי הגיבריש
הא םהכוונה שלאחר היבוא זה היה בגיבריש? או כשפתחת את הוקבץ עם עורך טקסט כלשהוא
בכל מקרה תנסה לבדוק את הcodepage

ברכה
דניאל
הנהלת האתר ביטלה גישת כתיבה ציבורית.

תגובה:יצוא אובייקט של QV כקובץ tab delimted 8 years 10 months ago #7173

דניאל, לא הכרתי את ExportEx - תודה :)
הנהלת האתר ביטלה גישת כתיבה ציבורית.
זמן יצירת העמוד: 0.224 שניות

הדף שלנו בפייסבוק

מעניין? שתפו דף זה באמצעות הטלפון הנייד

אירועים קרובים

מאמרים

מגמות של ביג דאטה בעולם הביטוח
CA Technologies
SSIS - Buffer Size Optimization
קטגוריה ראשית
בדיקות BI ו-DWH לעומת הבדיקות בתחומים אחרים
קטגוריה ראשית
איסוף דרישות לפרויקטי BI
קטגוריה ראשית
כח המידע במיקוד
קטגוריה ראשית
0

Microsoft

Oracle

IBM

Informatica

Sap

SAS

Qlikview

Cloudera

Machine Learning