Tag: 字典

如何用Python编写一个字典到Excel

我在python中有下面的代表一个From – To Distance Matrix的字典。 graph = {'A':{'A':0,'B':6,'C':INF,'D':6,'E':7}, 'B':{'A':INF,'B':0,'C':5,'D':INF,'E':INF}, 'C':{'A':INF,'B':INF,'C':0,'D':9,'E':3}, 'D':{'A':INF,'B':INF,'C':9,'D':0,'E':7}, 'E':{'A':INF,'B':4,'C':INF,'D':INF,'E':0} } 是否有可能输出这个matrix到Excel或一个CSV文件,使其具有以下格式? 我已经看过使用csv.writer和csv.DictWriter,但不能产生所需的输出。

VBA中的嵌套字典:错误457:此键已经与集合元素关联

我试图创build一个字典结构的字典在vba中 基本上,我从3列表开始: 产品Id | 客户ID | 资源 1 | 1 | 一个 1 | 2 | 一个 2 | 1 | 一个 3 | 1 | 乙 我想把它转换成一个主字典“DicByUser”,其中的键是用户ID,而这些项是另一个字典,它包含客户访问的产品和源代码的项目。 在这种情况下,我会 DicByUser = {1:{1:A,2:A,3:B},2:{1:A}} 我的方法是通过我的初始表的所有行,然后: 与Cid的客户ID, 将产品ID, 来源 If DicByUser.Exists(Cid) Then If DicByUser.Item(Cid).Exists(Pid) Then 'We do something on the item Else DicByUser.Item(Cid).Add Pid, source End If Else […]

Dictionaryparsingpython

我有一个字典,其中包含一个值列表的关键。 像这样的东西: {'a': ['a1', 'a2'], 'b': ['b1', 'b2'], 'c': ['c1', 'c2']} 我的代码来build立这个: import csv reader = csv.DictReader(open('abc.csv')) print(reader) result = {} for row in reader: for column, value in row.items(): result.setdefault(column, []).append(value) print(result) for k,v in result.items(): print(k,v) 我想要这样的东西: {'a' : a1,'b' : b1 , 'c' : c1} {'a' : a2,'b' : b2 , 'c' […]

访问VBA-Excel中的字典数组

我想使用一个字典数组来存储一个Excel的所有内容,以便稍后处理它,并在内存中进行操作。 我会定义的第一行的Excel是关键,其余的行是内容。 所以,因为我有一个关键许多值,我需要将它们存储在不同的容器(这将是数组)。 内容的一个样本 代码名称姓氏 1 ab 2 cd 所以,代码会是这样的: For Each rcell In ws.UsedRange.Cells If rcell.Row > 1 Then ReDim Preserve aRows(rcell.Row – 2) 'Set aRows(rcell.Row – 2) = CreateObject("scripting.dictionary") Set pInfo = New Scripting.Dictionary pInfo.Add Key:=Cells(1, rcell.Column).Value, Item:=rcell.Value 'aRows(rcell.Row – 2).Add Key:=Cells(1, rcell.Column).Value, Item:=rcell.Value Set aRows(rcell.Row – 2) = pInfo End If Next […]

VBA类中的Dictionary属性

我被要求用一些arcaic编程修改一个Excel工作表。 我决定重写它,而不是修改所有的GOTO语句和静态数组。 我的背景是在C#中,所以这是一个挑战(注意:我确定命名约定是坏的,我习惯于能够使用下划线来定义私有variables) 我在使用VBA应用程序的类中无法使用types字典的属性。 这个类的缩短版本看起来像这样 Private pTerminalCode As String Private pTerminalName As String …… other attributes Private pPayRoll As Dictionary 'Propeties Public Property Get terminalCode() As String terminalCode = pTerminalCode End Property Public Property Let terminalCode(Value As String) pTerminalCode = Value End Property ……. more properties Public Property Get headCount() As Dictionary headCount = pHeadCount […]

在VB.NET中重载Equals / GetHashCode以使用对象作为字典键

我有一个字典的关键是Excel范围对象(不,这是不可协商的),定义如下(typesCellProp是一个对象,其中包含各种单元格属性): Dim dic As New Dictionary(Of Excel.Range, CellProp)(New RangeComparer()) 因为键是对象,我需要重载Equals / GetHashCode函数。 我目前的实施情况如下: Class RangeComparer Implements IEqualityComparer(Of Excel.Range) Public Overloads Function Equals(ByVal x As Excel.Range, ByVal y As Excel.Range) As Boolean Implements IEqualityComparer(Of Excel.Range).Equals If x.Address(External:=True) = y.Address(External:=True) Then Return True Else Return False End If End Function Public Overloads Function GetHashCode(ByVal obj As Excel.Range) […]

将一个数据表添加到字典excel vba

我是使用字典的全新的,可以做一点帮助。 我有一个范围A1:C4的数据表 ABC 1 4 7 2 5 8 3 6 9 有什么方法可以直接将这些表添加到字典中? 提前致谢

使用vba中的自定义对象键访问字典中的项目

我有一个问题访问vba字典中的项目。 我有以下字典: Dim CResults as dictionary 我添加项目: CResults.add currentkey, result Currentkey是我从一个名为DCRkey的类创build的一个对象 Private loadcase as long Private csystem as String Private node as long result是另一个类DCR对象: Private Fs as double Private C1 as double Private C2 as double … 然后我尝试使用访问一个项目 Dim accesskey as DCRKey accesskey.loadcase=10 accesskey.node = 2000 accesskey.csystem="Global" Sheets("Results").cells(i,1).value= CResults(accesskey).C1 那是我得到的错误: runtime error 424 object required […]

我可以创build一个字典从Excel文件(而不是CSV)在python3?

我仍然是一个非常糟糕的程序员,正在开始我的项目。 我主要是Java的经验,但现在需要切换到我的项目的Python3。 我想使用我有的Excel数据文件,并为每一列build立一个字典,这意味着它所需要的值列表。 我使用Python3中的pandas库完成了与CSV文件类似的工作。 据我可以去,我用pandas导入文件,我如何创build一个字典? 我应该首先处理分类数据还是可以在字典中完成? import pandas as pd d = pd.read_excel("file.xls")

是否有可能search特定的键/值条目,然后,如果find,删除整个字典?

我有一个CSV文件,我将其作为词典列表进行迭代(设想一个由单个字典表示的Excel文件中的每一行,由一个列名和该列的值组成)。 有什么方法可以遍历所有的字典,search特定的键:值组合,如果find,删除整个字典? 本质上,如果特定列== 99999,然后删除行(字典)。 这是我所拥有的,我正在得到这种types的东西似乎很常见的“列表索引超出范围”的错误。 for i in range(len(csv_data)): column_name = 'specific_column' if csv_data[i][column_name] == '99999': del csv_data[i] else: pass