标签: excel-2007

我希望图表的系列名称显示为我的信息的列名称.当我有超过1列时,这可以工作,但是当只有1列信息时,似乎将系列名称设置为数字1.

我在Excel中手动复制它似乎假设列名是图表的名称.围绕它的方式似乎进入"选择数据"选项,然后选择"切换行/列"选项.

因此我的问题是,如何使用C#复制此选项？

将CSV文件导入Excel时，它只会从该行的FIRST字段中删除双引号，而将其保留在所有其他字段中。如何强制Excel从所有字符串中删除引号？

例如，我有一个CSV文件：

“ text1”，“ text2”，“ numeric1”，“ numeric 2”

“ abc”，“ def”，123、456

“ abc”，“ def”，123、456

“ abc”，“ def”，123、456

“ abc”，“ def”，123、456

我使用数据>导入外部数据>导入数据将其导入Excel。我指定以逗号分隔字段，并且文本分隔符为双引号字符。

数据预览列和实际Excel电子表格列均仅从第一个文本字段中删除双引号。所有其他文本字段周围仍带有引号。真正奇怪的是Access能够正确导入此数据（即，删除每个文本字段中的引号。

请注意，这与内部逗号或引号或转义字符无关。

在Excel 2003和Excel 2007中会发生这种情况。

我需要帮助在Excel 2007 VBA中设置X和Y轴标题.它一直抱怨"需要对象":

Sub macro2()

Dim xAxis As Axis

icount = 1

Charts.Add
Charts(icount).Name = iskewplane & "deg Skew Plane"
Charts(icount).Activate

Set xAxis = Charts(icount).Axes(xlCategory)
With xAxis
    .Axis
    .AxisTitle.Text = "Theta (deg)"
End With

我的代码中有什么问题吗？我在设置轴标题名称时尝试录制宏,但在名称设置期间宏为空白.

任何帮助表示赞赏

我有一个InputBox,用于将用户输入存储到变量中.用户输入的输入是单元号.

例如,弹出输入框并询问用户"你想从哪里开始？" 然后,用户将键入A4,或者他们想要启动的任何一个单元格.

我的问题是,有没有办法让用户物理点击A4格式而不是输入？

在此先感谢您的帮助

更新:所以,基本上我们有一长串水平跨越的转置数据列表.我们希望这些列表水平堆叠在一起,这就是这段代码应该做的事情.

之前一切正常,但用户必须手动输入单元格编号到InputBox中.输入框询问用户他们想要开始切割的位置,第二个框询问用户他们想要开始粘贴的位置.我会将这些输入值存储到字符串变量中,一切都像魅力一样.

从那时起,我希望用户能够物理地点击单元格,因为很难查看它实际上是哪个行号.下面的代码已更新,以反映尝试用于允许用户单击单元格的更改.我添加了Application.InputBox方法并将变量的声明更改为Range.

我一次一个地进入程序,看看发生了什么,这就是我发现的.之前,如果用户想要从B4开始并粘贴到A16,它将选择B的数据范围(B4:B15),将其剪切并粘贴到A16.然后,我获得代码的方式,它将回到B4用户输入点并使用for循环来增加我的x变量,它将偏移到右边的下一列.因此,它将重复切割色谱柱C(C4:C15)的过程并将其粘贴到A28(使用xldown),依此类推,用于前进的色谱柱.

当我进入当前代码时,现在发生的事情是我没有在Range变量中看到任何记录值.它执行了切割B4:B15并将其粘贴到A16的第一步,但是当它运行下一个循环时,它不是从B4开始并且偏移,而是从A16开始然后偏移.它应该返回到用户选择作为起始点的B4,然后进行偏移.

对不起,对于长篇解释,但我希望这有助于澄清情况.

使用Application.InputBox的当前代码

 Dim x As Integer
 Dim strColumnStart As Range
 Dim strColumnEnd As Range

 On Error Resume Next

 Application.DisplayAlerts = False

 Set strColumnStart = Application.InputBox("What cell would you like to start at?", "Starting position","Please include column letter and  cell number", Type:=8)

 On Error GoTo 0

 Set strColumnEnd = Application.InputBox("Where would you like to paste the cells to?", "Pasting position", "Please include column letter and cell number", Type:=8) …

在Excel工作表中有一个吨公式,引用另一个工作表:

例如,前几个单元格中的公式写在这里:

           A                                           B

   1      '[Another sheet 11.xls]Grill'!BD19            ...
   2      '[Another sheet 11.xls]Grill'!BF129
   3      '[Another sheet 11.xls]Grill'!AD29
   4      '[Another sheet 11.xls]Grill'!KA123
   5      ...

是否有任何一般的方法来用""替换"[Another sheet 11.xls]".

数据是从另一张纸上复制开始的,因此是borked引用.有没有其他方法告诉excel将引用保留在同一张表中？

xD Namaste

我正在制作一个ExcelComparer但是我遇到了一个可能明显的错误,我显然错过了一些东西.

我在Excel 2007中运行vba宏

我得到的确切错误是"运行时错误13:类型不匹配"当循环尝试获取第二个worksheet.name时会发生这种情况.
因此,第一个sheetname返回正常

在下面你找到宏

先谢谢你,L

Sub compare()

Dim strWorkbook1, strWorkbook2 As String
Dim Workbook1, Workbook2 As Workbook
strWorkbook1 = Worksheets("Sheet1").Range("C5") & Worksheets("Sheet1").Range("D5")
strWorkbook2 = Worksheets("Sheet1").Range("C6") & Worksheets("Sheet1").Range("D6")

Set xlapp = CreateObject("Excel.application")
Set Workbook1 = xlapp.Workbooks.Open(strWorkbook1)
xlapp.Visible = False

Dim ws As Worksheet
For Each ws In Workbook1.Sheets
  'ws.Select
  If Not ws.Visible = xlSheetVeryHidden Then
      MsgBox (ws.Name)
  End If
Next ws
xlapp.Close
End Sub

我已经耗尽了我的搜索功能,正在寻找解决方案.以下是我想要做的概述:

• 用户打开启用宏的Excel文件
  
• 即时提示显示用户输入或选择所需工作簿的文件路径.他们需要选择两个文件,文件名可能不一致
• 输入文件的位置后,从第一个文件选择第一个工作表将被复制到启用宏的工作簿的第一个工作表,第二个文件选择的第一个工作表将被复制到启用宏的工作簿的第二个工作表.

我遇到过一些ADO的引用,但我还不熟悉它.

编辑:我找到了一个从已关闭文件导入数据的代码.我需要调整范围以返回变量结果.

    Private Function GetValue(path, file, sheet, ref)

    path = "C:\Users\crathbun\Desktop"
    file = "test.xlsx"
    sheet = "Sheet1"
    ref = "A1:R30"

     '   Retrieves a value from a closed workbook
    Dim arg As String

     '   Make sure the file exists
    If Right(path, 1) <> "\" Then path = path & "\"
    If Dir(path & file) = "" Then
        GetValue = "File Not Found"
        Exit Function
    End If

     '   Create the argument
    arg = "'" & path & "[" …

如何从包含更多记录的单元格中获取电子邮件ID？

例如,Cell A1具有以下值:

google rockstar@xyz.com www.google.com

我想将rockstar@xyz.com从单元格A1复制到B1.

在我工作的地方,我没有得到加班费,但我累计工作加班的假期.我有以下电子表格,它可以计算我已经完成的加班时间和总计D15.

现在我想基于每天8小时来计算这是多少天.在D16,我已经完成=D15/8并将其格式化为h.mm \d\a\y\s,但这显示为2.26 days而不是2.4375 days.

使用的正确公式是什么D16？

我目前有一个包含1列和多行的Excel文件.该列包含名字,姓氏和可能的中间名(例如:John Abe Smith).我正在写一个有1个文本框和1个按钮的宏.在excel表中我有几个名字:

Column A
--------
John Abe Smith
Cindy Troll Bee
Randy Row
Joe Jumbo
Katie Kool Kat

我想编写一个宏,当我在文本框中键入内容并单击按钮时,它将在此列中查找名称.如果找到它,那么只需在消息框中说"找到"即可.

我想在搜索名字时使用通配符"*",但我不知道如何.我目前有一些像这样的代码,但通配符不起作用:

Private Sub search_Click()
    For firstloop = 3 To 10
        If Range("G" & firstloop).Text = name.Text & "*" Then
            MsgBox "Found!"
            Exit Sub
        Else
            MsgBox "NOT FOUND"
        End If
    Next
End Sub

例如,假设我在文本框中输入" Troll ",然后单击按钮.我希望循环遍历列以查找包含"Troll"的任何内容.示例数据的结果就是这样Cindy Troll Bee.

我怎么能这样做？